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EDITORIAL 
LICENSE 


By JOHN W. BROWN 





Well, it is that time of year 
again. summer time. This column 
at this time of the vear has been 

frequently used to remind people to "get a life” 
and to enjoy summertime. To be with the wife 
‘spouse or $.0.)} and kids. and to enjov vourself 
out in the summer air. To take a break from the 
computer. So in the middle of putting this 

issue together 1 decided to listen to that advice 
and went to see a show at the local Performing 


Arts Theatre with my wife. We were not disappointed! 


C-128_.JBEE on GEnie 


We saw Jim Nabors in concert which is something I have 
always wanted to do! Though known mostly for the TV 
show Gomer Pyle, he is also known the world over for 
his deep rich singing voice and a wide range of 
entertainment talents. Though the story telling was a 
bit corny, it fit with the show and storv clips on the 
projector screens. The tickets were a bit over priced 
and it would have been nice to meet him after the show. 
But, 1 still felt the tickets were well worth it and I 
would recommend seeing the show if you had a chance. 


Which brings me to 


"SURPRISE. SURPRISE. SURPRISE" 

We changed the format of the magazine and it was not 
easy! This tabloid page is roughly 50% larger than the 
previous sized page and has made layout of program 
listings much easier. The older page size had a 
printed page coverage of roughly 4/04 inches 
(O08x10.5x56 pages) Our new magazine will have roughly 
7280 inches (10x13x56 pages) which is a 50%+ increase 
in page coverage!!! This will be at no additional cost 
or increase in subscription fees now or in the future. 
lf everything works out we may even up the page count 
dramaticallv. We wili be increasing the page count 
incrementally. There will also be much more color and 
a wider variety of articles now that we have the room. 
Look for a lot more reviews in the next issue! 


We finally found suitable packaging that is cheaper 
than the plastic bags we have used in the past. We 
used PVC plastic bags because cheaper packaging was not 
available. I had tried in vain to buy the 
biodegradable plastic bags made from corn starch but at 
$0.12+ a piece in large quantities it just was not 
feasible when plastic bags cost four times. 


Most of the free issues of #33 were shipped in 
specially purchased paper bags that we were trying out 
before committing to this new format and packaging. I 
believe DuPont, of all companies, makes these new paper 
bags. Besides being biodegradable and saving plastic 
trees .) this new packaging means we no longer have to 
| have a "mailing page" and can recover that page for 
expanded editorial use. We used it for the new —-64. 
checksum program on page 56 Mike Gilsdorf rushed to 
finish for me. Thank you Mike. 


Companion Disk issues and Overseas issues will still 

use the plastic bags or special paper envelopes because 
we have to provide those issues with more than adequate © 
protection that is not needed for the bulk issues 

mailed in the US. 
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I figured this move cuts down on the use of at LEAST 
1500 lbs of plastic bags that we use a vear. which are 
not biodegradable, and are thrown away after the 
magazine is opened. Unless some of vou have been using 
them to store your frozen vegetables -) As some of 
you probably have noticed, I like to reuse floppy 
mailers, cardboard, obsolete w-2 envelopes or anvthing 
else other companies and people throw away or dump as 
trash. I am sure it is a relatively small amount in 
the scheme of things but eliminating this plastic bag 
usage was something I have wanted to do for the longest 
time. Speaking of paper problems 


ITS TOO BIG and TOO MUCH! 

My local dealer wanted $100 for a fourteen inch paper 
tray, being a frugal Commodore owner. I was not about 
to pay that much for a paper tray! After all, how much 
does it cost to produce and market a relatively low 
tech piece of plastic and metal like a paper tray. 


Luckily, as I suspected. fourteen inch paper works fine 
in a 1l inch tray. as long as you do not mind tne paper 
flopping over the end of the tray. For $100 I doe not 
mind that much. What I really need is a 1llxl, duplex 
Hewlett Packard laser printer that costs more than my 
van and car put together. The piecing together of the 
pages, since the printed image is wider than 8.5 
images, drove me crazy. Six rolls of tape for this 
issue. I hope the camera shots look acceptable. I 
honestly do not know how good it will look spliced and 
diced with all this tape. Live brave and pray a lot! 


Well. 1 hope this issue finds you in good health ‘even 
our critics) and that you enjoy the summertime and warm 
weather. 


JBEE 
oe 


IN THE NEWS 


NEW GENIE RATES 

(Editor’s note:this press release was edited to fit the 
page space available » Mav 24, 1993 -- GEnie todav 
announced a new pricing stucture. for the U.S. and 
Canada. that reduces hourly connect rates by 50%. 
Effective Julv 1. GEnie s standard hourlv connect rate 
drops to $3.0U per hour :$4.UC Canadian: The monthly 
fee has been restructured, and moves from $4.95 to 
$8.95 (from $5.95 to $10.95 in Canada). which will 
include up to four hours of standard connect time 
access to most GEnie services, such as software 
downloads, bulletin boards. email. an Internet gateway. 
multi-player games and chat lines. This change'also 
eliminates the GEnie*Basic package. | 


GENIE ANNOUNCES NEW PRICING SIMPLER. MORE AFFORDABLE 


“AND, AS ALWAYS. THE BEST VALUE ONLINE 4 


An Open Letter to GEnie Subscribers From John Barber, 
General Manager of GEnie: 











On Julv lst. a new pricing structure goes into effect GEnie Pricing 


at GEnie. It’s a big day for us -- the result of months (effective July 1, 1993) 
of planning, number-crunching, monitoring and 
maneuvering around the competition. And once again, pesca ceueeesis eres rsace esate eoeeeien 4 
we're looking forward to showing the online community Ghraw Seeeiees U.S. WU.S.8) [5] CANADA (CAN S$: 
that no one offers a better value than GEnie. egw ahaa seseuses ees nese ees Pessi eres sea es ee eee 
Monthly Subscription Fee $8.95/month $10 .95/montr. 
GEnie has always offered its subscribers the best Peers ace Seee tse esis eo eetees oes eee $------ +5 === ++ -- eee + 
combination of sophisticated services. information. Hours Credited Per Month [1] Up to 4 hours Up to 4 hours 
entertainment -- and affordabilitv And we ve done it fern ne ee en ee ee po o----+---------- pon ean ane nine eee + 
once again. Starting July lst. GEnie wili offer you Hourly Connect Charge $3.00/hour $4.00 /hour 
the lowest hourly connect time of all the major online $----------------------------- fo - nnn nnn - 227+ ---- $2 2-22-72 -------------- + 
services; combined with a highly-competitive monthly GEnie Premium Services Prices vary per individual service. 
subscription fee; and credit each month for up to four These include: Charles Schwab Brokerage 
hours online. Services (not available in Canada; Dow 
Jones News;Retrieval (R), The Official 
Effective July lst, this is GEnie’s new U.S. pricing Ai wine: Galnes -PISchcon Ee Ea aee URS 
structure: Travel Service. QuikNews clipping 
service, Telebase Investment 
- Our monthly subscription fee becomes $8.95 a month. ANALYST (SM),ARTIST (R) gateway. 
- Our standard hourly connect rate drops to $3.00 an ee ieee efi esiale Ss ae ere ae use eeeten sega dus see uote eased re 
hour. Additional Charges (where applicable) [4] 
- And every month, you’ll get a credit for up to 4 bias i ciespaletctd oaital hs Deas Sates cou Ses SP ta Ree in Pismeceee eee eee ES 
hours of standard $3.00 connect time. Prime Time Surcharge [2] $9.50/hour $12.00/hour 
$----------------------------- $---------------- 4+---------------~------- + 
It's about that simple. For our Canadian and 9600 Baud Surcharge $6 .00/hour $4-00/noGt 
international PDN customers, a complete price chart is ees a a ie tee ie PM he Sate pee eres e ae a a ee aR Re ee Ae + 
available. Communications Surcharge: 
800 Service [3] $6.00/hour 2s 
SIMPLY BETTER Extended Network $2.00/hour ae 
You might notice one more important benefit to our SprintNet $2.00/hour bids 
plan. We kept it simple. It’s easy to understand. Datapac — $6.00/hour 
easy to live with. Multi-player games, downloading. peste Reet te tee tet ae Ee eee ee eae fee ee aetna is 
computing bulletin boards, real-time conferences -- [1] Credit for up to 4 hours of standard $3.00 U.S. ($4.00 CANS: 
they're all just $3.00 an hour. connect time. Hours credited apply to current month only. 
[2] Prime-time: 8 a.m. - 6 p.m. local time on weekdays only. The 
OK, NOW WHAT DOES IT MEAN TO MY MONTHLY BILL? prime-time surcharge is in addition to S$3/hour charge. Prime- 
Let's cut to the chase. This is what evervone really time surcharge is waived for selected holidays. Residents cf 
wants to know. For the people who like to keep to a Hawaii, Alaska, Indiana, Arizona and Puerto Rico, please verify 
strict budget each month, this plan offers a lot of neuper SPU Chale Cll enk: Seruices.: 
flexibility and a broader range of services than (3) *e00' Service surchaves waived St 9600 baud: 
before. You have a set subscription fee. And for that [4] State taxes will apply in some areas. 
fee, you get a credit for four hours of standard [5] International PDN subscribers billed in U.S.S at U.S rates 
connect time to spend just about anywhere on GEnie. ENR i cc ag ele ee ea S, 


There’s no asterisk-chasing to make sure you haven't 


strayed into Value services. Less worry of credit card COMMODORE LOSES $177.6 MILLION IN THIRD QUARTER 
shock. You can even explore areas of GEnie you thought Commodore International Limited reported a net loss of 
you couldn’t afford before. For the active users who $177.6 million on sales of $120.9 million for the third 
spend significant hours a month on GEnie. especially in fiscal quarter ended March 31. 1993. This compares 
the former GEnie Value services, you should see a with earnings of $4.1 million on sales of $194.6 million 
tremendous savings. The hourly rate is half what it in the year ago quarter. 
was before -- and the best in the business! 

| Overall the sales decline of almost 40 percent for the 
SOME THINGS NEVER CHANGE quarter was primarily due to prevailing economic 
GEnie has always been the very best service for people softness in all of the Company’s major markets, 
who really enjoy being online. and who expect great | especially Germany. There was also significant pricing 
products and the best value for the time they spend erosion for the Company's older Amiga models and PC 
with us. That's not going to change. In fact, this products. Unit volume of Amiga products declined 25 
new pricing structure should make it even easier for percent while Amiga revenues declined over 45 percent. 


you to enjoy everything we have to offer. We're 

looking forward to seeing you online. 
INEXPENSIVE 4 MEG FLOPPIES 

Sincerely, John Barber, General Manager, GEnie If you need inexpensive EHD floppies for vour FD-4000. 
this is the place. ParSec bought Maxell 3.5 DS/ED 4MB 
disks, 10 to a pack, for $39. Thev Look prettv cool 
with the matte black finish, black shutter, gold 
lettering, and gray labels. B.C.S. also offers bulk 
4.0 MB floppies for only $1.99 per disk! 


(continued on page 29) 
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GEOS MACHINE LANGUAGE 
PROGRAMMING: ICONS & 
MENUS | 


BY ROBERT A. KNoP JR. 


I. INTRODUCTION 

All GEOS users are familiar with the appearance of icons 
and pulldown menus. Briefly, icons are little pictures 
on the screen; when you move the pointer over one such 
picture and click the button on your mouse or joystick, 
the program performs some action. Pulldown menus appear 
in a strip across the top of the screen; selecting one 
item from a menu may bring up a submenu, or may send the 
program to perform some action. 


Including icons and menus in your own GEOS programs is 
easy. You merely need to supply the GEOS Kernal with a 
couple of tables that define how many icons and menus 
you want, where you want them, what they look like, and 
the "service routines" to call when they are selected. 
GEOS will then take care of detecting when an icon or 
menu has been selected, and all you need to do is write 
the service routines. 


II. ICONS 


THE ICON DEFINITION TABLE 

You specify what icons will appear in your application 
in the Icon Definition Table. At the top of this table 
is a header: 


.byte Number of Icons 
.word Initial X Position 
. byte Initial Y Position 


The initial positions specify where the pointer will 
appear when the icon table has been set up. This lets 
you start the user out with the pointer over 2 given 
icon, or anywhere else on the screen. If you pass all 
O's for the initial positions, GEOS does not place the 
pointer anywhere, but leaves it where it was before the 
icon table is drawn. 


Following the four byte header is one eight byte entry 
for each icon. There must be at least the number of 
eight byte entries as the number of icons you specified 
in the table header. Each icon entry follows the 
format: 


.word Pointer to Icon Picture 
.byte X Position (in cards) 
.byte Y Position (in scanlines) 
. byte Width (in cards) 

. byte Height (in scanlines) 
.word Service Routine . 


The first word should hold \the address in memory of the 
picture for the icon. This| picture should be in the 
GEOS compressed bitmap format - but geoProgrammer owners 
need not worry about that. fo all they need to do is 
paste a photo scrap into the| geoWrite source file. 

(Note that you do NOT paste the picture in within the 
icon definition table; rather, put it on another page 
with a label like "Icon0Pic", and then put that label as 
the first word in the icon’s entry in the icon 
definition table.) If the pointer to the icon picture 
is $0000, this icon is disabled. You can use this to 


turn icons on and off during the execution of your 
program. 


The x and y positions are measured from the top left 
corner of the screen. For icons, all X values are given 
in cards. This means that icons must be an integer 
multiple of 8 pixels wide, and must appear a multiple of 
8 pixels from the left of the screen. You have complete 
freedom for the height and Y placement of an icon. In 
order to use the same icons in both 40 and 80 columns 
under GEOS128, you can set the "bitmap doubling bit" in 
the X-position and width entries in the table. 
Unfortunately, GEOS 64 does not recognize and ignores 
this bitmap doubling bit as it should. If it is 
present, it will produce unpredictable results with 
GEOS64. When the high bit is set in either the 
X-position or the width byte in an icon’s entry, GEOS 
will automatically double those values when the icon is 
drawn on the 80 column screen. It will even take care 
of stretching the icon picture, so you need only supply 
one picture. In practice, you can set this bitmap 
doubling bit by ORing the value with $80, e.g.: 


. byte $80 IconWidth 


Bitmap doubling will be discussed at greater length in 
the next article in this series. 


The last word in the icon’s entry is the address of the 
service routine to be called when the user clicxs on the 
icon in question. Before calling the routine, the GEOS 
will flash or invert the icon depending on the value of 
iconSelFlag ($84b5). STFLASH ($80) makes GEOS flash 
selected icons, STINVERT ($40) makes GEOS invert them 
permanently, while $00 indicates that GEOS should just 
directly call the service routine without doing anything 
to the screen image of an icon. You can configure the 
speed of this flash (if STFLASH is set) by changing the 
value in selectionFlash ($84b3). Higher values mean a 
slower (longer) flash. The default value is 
SELECTIONDELAY (10). 


To install an Icon table in an application, you use the 
GEOS Kernal routine DolIcons ($cl5a). Load the zero page 
word length pseudoregister r0 ($02) with the address of 
your icon table, and call the routine. GEOS will draw 
the icons, and begin detecting icon events with the 
icons in this table. You can disable individual icons 
at any time by setting their picture pointer word to 
$0000, and re-enable them by setting the word to 
anything other than zero; no call to Dolcons is 
necessary. To replace the entire set of current icons 
with another, you can at any time load r0 with the 
address of a different icon table and make another call 
to DoIcons. You will need to erase the old icons 
yourself, however, as DoIcons will not erase old icons 
from the screen, but will only draw the new ones on the 
screen. If you wish to use no icons, or you want to 
disable altogether a current set of icons, you can pass 
a "null" icon table to GEOS: 


.byte 1 ;One icon 

.word 0 

. byte 0 

.word $0000 ;0 picture means disabled icon 


. byte 0,0,0,0 ;Positions, sizes all zero 
.word $0000 ‘null service routine 


Why not just pass it a table with the number of icons as 
zero? GEOS expects that every application will have at 
least one icon at all times. So, if you do not want to 
use icons, you need to call DoIcons with a table that 

specifies one disabled icon as is shown in this example. 





THE TC-128/64 NEWS #34 


Since GEOS needs the icon table as long as it is active, 
VLIR applications (discussed in the previous article in 
this series) must keep the table in the resident section 
of their code. If you do place it in an overlay module, 
you must be sure that this overlay module will be in 
memory as long as this icon table is active. The images 
for a set of icons, on the other hand, are only needed 
at the time of the call to Dolcons, so «: would be 
feasible to have an initialization module that contains 
the icon pictures, which gets swapped out following the 
call to Dolcons. 


ICON SERVICE ROUTINES 

The service routine called when a user clicks on an icon 
can do most anything - even replace the current list of 
icons with another through a call to Dolcons. The 
service routines for icons must either be in the 
resident module of your code, or vou must be careful to 
disable relevant icons before swapping out an overlay 
module with icon service routines. In practice. this is 
not a severe limitation because vou can write a three 
line resident "stub" service routine for each icon which 


(1) loads the accumulator with the number of the overlay 
which contains the meat of the routine, 

(2) calls a routine that checks if the 
accumulator-specified overlay module is in memory. 
and if not, loads it, and 

(3) jumps to the meat of the routine in the overlay 
module. 


When the service routine starts up, GEOS passes a couple 
pieces of information te it. rOL will have the number 
of the icon which the user selected. This can be useful 
if you want to use one routine for a number of different 
icons, with a slightly different effect for each icon. 
Consider, for example, a calculator program which really 
only needs one routine for all of the "number" icons. 


rOH holds the double-click flag; TRUE (S$ff) indicates a 
double click, while FALSE ($00) indicates a single 
click. This is fine if you want the service routine to 
run with only a double click; utilizing this flag 
becomes more challenging if you have two separate 
behaviors for single clicks and double clicks, as your 
routine will actually be called twice during a double 
click, once after the first click (with rOH set to 
FALSE) and one after the second click «with rOH set to 
TRUE). There are a couple of ways to deal with this. 
First, during the first call you can watch the mouseData 
($8505) variable (the high bit of which is OU when the 
mouse button is down, 1 when it is up) to see if the 
user performs a release and a second click within a 
given time limit. Second, you can have the double click 
action be a superset of the single click action. The 
latter is what the deskTop does with file icons. One 
click, be it the first of a double click or a solitary 
click, selects a file’s icon. The second click of a 
double click opens the file. 


Upon a call to Dolcons, icons are drawn from lower 
number to higher number. This means that if two icons 
overlap each other, the higher numbered icon will appear 
"on top." However, when the GEOS mainloop decides which 
icon service routine to call, lower icon numbers take 
precedence. Because of this discrepancy, it is best to 
keep your icons from overlapping. If you must overlap 
icons, to avoid user confusion you may need to redraw 
some of the icons manually. (The graphic routines you 
would use to do this will be discussed in the next 
article in this series. ) 


III. MENUS 

Menus, like icons, are defined with a table. The menu 
table is somewhat more complex, allowing for submenus. 
Unlike icons, applications do not need to have menus, so 
an application which wishes not to use them need not 
install a trivial menu table as is the case with icons. 


Like an icon definition table, a menu definition table 
begins with a short header: 


.byte Top of Menu (pixels) 

.byte Bottom of Menu (pixels) 
.word Left of Menu in (pixels) 
.word Right of Menu in (pixels) 
.byte Number of Items Menu type 


Note that unlike icons, you can specify X menu positions 
to the pixel. While bitmap doubling is again available 
for the X values (by setting the high bit of the word), 
it is less useful for menus because the BSW128 80 column 
system font is not exactly twice as wide as the BSW 40 
column system font. For GEOS128 applications that 
support both 40 and 80 columns, it is probably easiest 
to just have two separate menu tables. 


For vertical position and height values, you can figure 
that each line in a menu needs 14 pixels. Horizontally, 
you are on your own. One tried and true method is to 
experiment, and tweak the x position and width values 
until they are right. (GeoDebugger can be very useful 
for this.) Prior to version 2.0, GEOS did not deal well 
with menus that went further right than 255 pixels. 
While this is not usually a problem in 40 columns, it 
severly limits the potential width of 80 column menus. 
This shortcoming has been fixed in GEOS128 2.0. 


The low 6 bits of the last byte in the menu table header 
specify the number of items in the menu. The 6th bit 
specifies whether this menu is "constrained" (bit6=1) or 
"unconstrained" (bit6=0). When a constrained sub-menu 
is open, the user will only be able to move the pointer 
off of it in the direction of the parent menu to this 
submenu. You do NOT want to make your main top-level 
menu constrained. The /th bit of the final byte ina 
menu tat'- header specifies whether the menu is 
horizontal (OQ) or vertical (1). 


Your main menu, to fit the pattern long established by 
existing GEOS applications, should be horizontal. To 
set these two bits, you can use the geoAssembler OR 
operator and the geoProgrammer constants "horizontal", 
"Vertical", "constrained", and "unconstrained". 


Following the menu header is a number of menu entries 
equal to the number in bits 0-5 of the last byte of the 
header. Each menu entry has the form: 


.word Pointer to Menu Text 
.byte Menu Item Type 
_word Pointer to Routine or Submenu 


The menu text is simply a pointer to a null terminated 
text string. One common trick with this text is to 
leave two blank spaces at the beginning of the text for 
"toggle" menu items. When _ this menu is selected, you 
can put an asterisk in place of the first space to 
indicate the selection. GeoWrite uses this for its font 
and style submenus. 


The menu item type is one of MENUACTION ($00), SUBMENU 
($80), or-DYNSUBMENU ($40). MENUACTION menu items are 
much like Icons. The last word in the item’s menu table 
entry specifies a routine to call when this menu item is 
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selected. Before calling the routine, GEOS will flash 
the menu item on the screen. The rate of this flash is 
controlled by the same variable (selectionFlash) that 
controls the rate of icon flashing. 


The final word of menu table entries for SUBMENU type 
menu items is a pointer to another menu structure. When 
the SUBMENU menu item is selected. GEOS will open and 
display the menu specified by the submenu table. The 
submenu table has exactly the same format as the main 
menu table. beginning with a menu table header. 


A "dynamic submenu," a menu item of the type DYNSUBMENU, 
is a cross of the other two. It allows you to call a 
routine before opening a submenu. This can be useful if 
you need to do some system cleanup whenever a submenu is 
opened. The final word in the item’s entry in the menu 
table specifies the routine to be called. At the end of 
that routine, load the word rO ($02) with a pointer to 
the submenu table. and upon returning from this routine 
GEOS will open the submenu. Return $0000 in r0O to open 
no submenu. 


As with icons. vou submit. your menu table (and all of 
its daughter submenu tables) to GEOS bv loading r0O with 
a pointer to the top level menu table and calling DoMenu 
(Sel151). The entire menu table, as well as all of the 
text for all of the menu items. must be in the resident 
portion of VLIR applications. as GEOS refers to it when 
determining which menu items have been selected and when 
opening submenus. 


MENU SERVICE ROUTINES 

Like icon service routines, menu service routines must 
be resident. Again, you can use resident "stub" 
routines to call routines in overlay modules. Menu 
service routines have one additional requirement: 
before doing anything else, they must take care of the 
opened menus. Fortunately, this is easy. Most menu 
service routines will simply call the routine 
GotoFirstMenu (Sclbd), which retracts (erases) all 
opened submenus. 


The routines called by DYNSUBMENU items have additional 
data available to them. The variable menuNumber ($84b/7) 
holds the current submenu depth; when the current menu 
is the top level menu, menuNumber will hold the value 0. 
The accumulator holds the item number within the current 
submenu, where the first item in the menu is item number 
O. Additionally, dynamic submenu handler routines may 
wish to make use of two additional routines: 
DoPreviousMenu ($c190) retracts the current submenu and 
activates its parent menu. ReDoMenu ($cl93) reactivates 
the current submenu. 


IV. SELECTIONS ELSEWHERE 

GEOS takes care of calling the appropriate routine when 
the user clicks the mouse or joystick button with the 
pointer over an icon or a menu item. What about other 
clicks anywhere else on the screen? To intercept these 
mouse events, load the "vector" otherPressVec ($84a9) 
with the address of a routine to be called whenever the 
user clicks on a position other than an icon or a menu. 
(A "vector" is just a word that specifies an address of 
a routine that is called under certain circumstances. } 
Load otherPressVec with $)000 if you want to ignore 
these events. | 


While the routine in otherPressVec is only called for 
those presses with the pointer not on a menu or an icon, 
it is called everv time the user releases the button, 
regardless of whether or not the original press was over 
an icon or menu. If you wish to ignore releases. simply 
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check the high bit of the variable mouseData ($8505). 

If the high bit of this is 0, the routine was called as 
a result of a mouse button press. If it is 1, the 
routine as called as a result of a mouse button release. 
If you do want to detect releases, you will have to 
develop your own code for detecting whether the original 
press was over an icon or menu. An easy example would 
be to set some application flag every time the 
otherPressVec routine is called due to a press. When it 
is called due to a release, it can check this flag to 
find out if the mouse had been somewhere other than an 
icon or a menu when the button was pressed. 


This wraps up the article on icons and menus. There are 
a few details which have been left out: some of these 
will work themselves into iater articles. 

Next in the series: all about the plethora of GEOS 
Kernal graphic routines, and using graphics in GEOS, 
including a discussion of bitmap doubling on the GEOS128 
80 column screen. 


CLASS(Y) ADS 


Starting with issue #35 we will have a new classified section with a low per 
line ad charge. All ads have to contain either a phone number OR a mailing 
address. People with POBs have to submit a street address to Parsec with a 


matching night time telephone number that can be verified with directory 


assistance. We will not release the street address to anyone UNLESS there is an 


UNRESOLVED problem with your ad. We will notify you first. 


CLASS(Y} ads can be submitted on either 1541 or 1581 disks as either PetAscii or 
straight Ascii sequential text fiies. You can also submit them printed by hand 


or printed out on a printer. Parsec is not responsible for omissions or 


typographical errors. If you can send matching hardcopy with your ad it wili be 


appreciated. 


BUYER & SELLER BEWARE! 


The guidelines to buying through the mail are unless you know the person weli: 

i) Buyers and sellers should insist on COD. ship by UPS (if possible). cash or 
money order! 

2) Get a telephone number! 

3) Try to have some fun horse trading! :) 

RATES and RULES 

$0.50 a line with a minimum charge of $10 per ad. 

Each line is 35 characters wide. 

Only alphanumerical characters allowed plus puncuation. no special characters. 

The Seller must be a TC-128/64 subscriber. 

Commercial advertisers have to submit a copy of their product for review. 


Your ad does nct have to be computer related. 


We reserve the right to cancel any ad for any reason. Canceled ads will have 


their money returned. 


If there is not a category already created for your Class(y) Ad, then we will 


create one 











GATEWAY 2.5 REVIEW 
BY RoBERT A. KNOoP JR. 


INTRODUCTION 

In issue #31 of Twin Cities 128, Dick Estel reviewed 
CMD's replacement desktop for GEOS. known as The 
GateWay. So why is it being reviewed again here? 
Well, CMD has subsequently released version 2.5 of 
GateWay, which I will be addressing in this review. 


First, for those of you who have not seen the review in 
issue #31 and who are not familiar with the GateWay, I 
shall briefly summarize what it is. The GateWay is a 
program you can use to interact with GEOS in place of 
the deskTop, which is supplied with GEOS. Versions of 
GateWav are available for both GEOS64 vz.0 and GEOS128 
v2.0. The GateWay was originally introduced in order 
to allow GEOS to be compatible with CMD’s memory 
storage hardware such as RAMLink. Since then, CMD has 
released a number of patches which can be made to the 
normal deskTop GEOS system in order to use these 
devices with GEOS, but GateWav remains available as an 
alternate user interface to GEOS. Additionally, 
despite the patches for the deskTop. the GateWay still 
has more complete support for CMD memory devices such 
as RAMLink. 


WHAT’S NEW? 

What's new with version 2.5 of GateWay? The feel of 
the program. and the basic functionality. is the same 
as it was in previous versions of the program. One 
change is the name in the author box. GateWay was 
originally written by Paul Bosaski. Jim Collette has 
now taken over the project. For those of you who do 
not know of Jim, he is probably one of the most 
prolific and talented GEOS programmers out there, and 
one who knows GEOS better than almost anybody else. 
The other evident changes to the GateWay are numerous 
bug fixes and performance improvements. One no longer 
has to worry nearly as much about surprise crashes and 
the general operation of the program is smoother. 


DESCRIPTION AND CHANGES 

GateWay’s basic operation was described in the review 
in issue #31, so I will only briefiv summarize it here. 
Basically, in place of the deskTop’s icon-laden disk 
notepad, there is a window which lists the names of the 
files on the current disk. To the left of the name is 
a small “mini-icon" which indicates the type of the 
file (e.g. System,-Application, Application Data, 
etc.). The notepad can be made either narrow. just 
showing the filename and updating the screen faster. or 
wide, showing filename, file type (in words), and file 
size, at the cost of slower screen updates. You select 
files by clicking on the filenames. 


As with the desktop, multiple files can be selected bv 
holding down the C= key. Below the window with the 
filenames is the trash can and three icons for disks A, 
B, and C. Unlike the DeskTop. GateWav directlv 
supports all three disk drives without having to swap 
drives. However. swapping is still available. for 
backward compatibility with BSW applications. 


There is a full suite of menu options. roughlv 
equivalent in functionality to that of the deskTop. 
One notable difference is the "geos" menu. which 
instead of Desk Accessories features "GateWavy 
Documents." GateWay documents may be installed into 





the GateWay program file itself using the GWMover 
utility. This allows you to expand the functionality 
of the GateWay at the cost of a larger GateWay file. 


As with previous versions of GateWayv the full 
functionality of the program is not available unless 
you have some form of RAM expansion, i.e. either a 
RAMLink, RAMDrive, or REU. 


Now that version 2.5 of GateWay has been released, how 
has it improved from previous versions? The 
fundamental and most important change is that it is 
much more stable and less buggy than previous versions. 
I have an older copy of GateWay, and briefly used it, 
but before long I shelved it and went back to the 
deskTop because unexplained system errors were far too 
frequent. This is no longer the case with version 2.5, 
which has performed consistently and reliablv with my 
system. 


This greater stability extends to the Switcher too. 
Briefly, the Switcher is a task switching utility for 
GEOS, similar to though easier to use than geoWizard. 
For example, from within the GateWay, you can activate 
the Switcher, and then run geoWrite. Hit escape, and 
you are out of geoWrite. and back at the GateWay. Run 
geoPaint, and thereafter, hitting the ESC key swaps you 
between geoWrite and geoPaint. Basically, you can have 
two separate GEOS sessions going, and swap between them 
at will. With previous versions of GateWay, you were 
most likely to crash when using the Switcher. Now, 
however, the Switcher has been completely rewritten, 
and is rock-solid. And, on the C-128, all 128K of the 
128’s RAM is saved, unlike the previous version which 
only saved the 64K of GEOS "FrontRAM." The switcher is 
a little slower than the older version, it takes 3 or 4 
seconds to swap between processes, but this is very 
minor and well worth the added stability of the 
switcher. 


One important difference in functionality is how 
GateWay deals with the trash. With the deskTop and 
older versions of the GateWay. you could only sometimes 
recover the last file deleted. With the current 
version of GateWay, every file you delete is stored in 
the trash, until vou explicitly select “empty Trash" 
from the "special" menu. You can recover anv of these 
files by clicking on the trash can and double clicking 
on the filenames you wish to recover. 


COMPARISONS WITH OTHER DESKTOPS 

So, which should you use, deskTop. or GateWay? This 
remains very much a matter of personal preference, the 
most important question still being, which do you 
prefer, more intuitive icons or more flexible filename 
lists? While the GateWay is more modern that the 
deskTop and, I would venture, somewhat more powerful, 
the difference is not enough to overcome personal 
preference of icons vs. no icons. If one single reason 
were to convince me to use the GateWay over the 
deskTop, it would be GateWav's abilitv to copv new 
versions of multiple files from one disk to another 
without having to verify overwriting each and everv 
single file. If one reason were to convince me to use 
the deskTop over the GateWay, it would be the deskTop’s 
ability to list files by date. 


A more relevant comparison might be GateWay and Dual 
Top. Why? Both operate on the same idiom i.e. lists 
of filenames. Basically the difference in 
functionality between these two programs is how thev 
use the width of the screen. Dual Top uses it to list 
filenames from two disks. GateWav uses it to make 
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available at a glance more information about each file. 
Each of these has its advantages and disadvantages. In 
terms of the feel of the two programs. the operation of 
Dual Top is generally faster than that of the GateWay. 
especially in 80 columns on the 128. This is most 
evident when scrolling through the filename list, which 
flies on Dual Top but is still somewhat slow in 
GateWay. Also, Dual Top at least has some support for 
a fourth disk drive, something GateWay doesn’t even try 
to do. 


COMPLAINTS 

My first complaint about the GateWay is that it will 
not list files by date. When you list files with full 
information. the information vou get is filename, file 
type, and size. Size is nice, but why do we need to 
see the file type? That information is there already. 
in the form of the mini-icon to the left of the 
filename. So listing the type type is redundant. This 
space could have been used much better by listing the 
date and time of creation for the files. Especially 
when you consider almost every piece of CMD hardware 
comes with a clock or has it as an option. The only 
way in GateWay to see the date of the file is to pull 
up that file’s "info" box. Dated files are one of the 
great conveniences of GEOS. I think that Commodore 
programmers have lost track of how useful this can be 
by living for 10+ years with a filing svstem that does 
not store nor show the creation times of files. 


My second complaint has to do with the support of CMD 
hardware devices. Before making this complaint. I want 
to temper it bv noting that GateWav unsurprisingly has 
better support of CMD devices than anv other deskTop in 
my experience. 


Thanks to Jim Collette’s patches ‘available from CMD. 
and included with RAMLink and other CMD hardware). GEOS 
and the deskTop can be used with CMD hardware devices, 
such as RAMLink, using 1581 partitions. With another 
program from CMD. geoMakeBoot, you can.even boot GEOS 
from CMD devices. All of this functionality and more 
is included with the GateWay. The GateWay works 
naturally and easily with my RAMLink. Additionally, 
with the GateWay you can make any GateWav supported 
disk a GEOS boot disk. Booting GEOS/GateWay off of my 
RAMLink takes less than 20 seconds- after which GEOS is 
ready to go, impressive! 


The other thing GateWay supports that non-GateWay GEOS 
does not is CMD native mode partitions. ‘Note: thanks 
to a tipoff from Steve Vanderark. I found that the 
deskTop and Dual Top. when run from within GateWav 

do in fact work with these native mode partitions. } 
Supplied with GateWay is CMD MOVE. a program that lets 
you copy files between CMD partitions. Though, for an 
example, on a RAMLink. if you are running in a native 
partition, you can only copy to other native 
partitions, and if you are running in a 1581 partition, 
you can only copy to other 1581 partitions. ) 


What is sadly lacking, however. is complete 
subdirectory support! One of the biggest advantages of 
CMD native mode partitions is the abilitv to make 
subdirectories in those partitions. so vou can organize 
the files in a huge partition logically It would be 
nice if this were completely supported in GEOS. 


Some subdirectory support is present in GateWay. With 
the GateWay document "MakeDir." vou can make a new 
subdirectorv. Opening that subdirectorv is as simple 
as double-clicking on its name. This makes that 
subdirectory effectively your current disk. Clicking 
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on the close icon at the upper left of the filename 
window puts you into the directorv just above your 
current subdirectory, or lists all possible partitions 
you could select if you are already at the top 
directory. 


This is all well and good, but not enough. In order to 
open a document in a subdirectory, a copy of the 
document’s application must be present either in the 
same subdirectory, or on another disk. Both of these 
present problems: if you have copies of all 
applications in all subdirectories where there are 
documents for these applications. you are wasting a lot 
of space by keeping multiple copies of the same 
applications in many places on the same disk. Choosing 
to keep the application on another disk usually means a 
physical disk such as a 1541 or 1581 and doing this vou 
lose the speed advantage of having your application on 
a RAM disk. 


The barely acceptable hack "Bordercross" is a GateWay 
document which presents a partial solution to these 
problems. When you select a file and then choose the 
"Bordercross" option under the GEOS menu, the file is 
moved to what would be the deskTop border. These 
border files are visible at the end of the directory 
listing for ALL subdirectories in a partition. This 
allows you to have just a single copy of up to eight 
applications (and you will want the GateWay to be one 
of these eight) and have documents for those 
applications spread throughout directories in the 
current partition. 


While this is nice, it is also flawed. First, there is 
no way within the GateWay of telling which files are 
actually on the border. They are at the end of the 
directory listing, but there is nothing other than that 
to set them apart from the normal files in the current 
directory. : 


Second, there is no way within the GateWay to’ 
subsequently get files off of the border. If you try 
to Bordercross a file already on the border, that file 
simply disappears What is needed is the ability to 
set a "Search path" in the same way one can using CP/M. 
In other words, when an application is not found in the 
current directory, GateWay should search a 
user-configurable set of devices and directories for 
that application. 


A second complaint about subdirectories is that there 
is no easy way to copy files between subdirectories. 
CMD MOVE will copy files between partitions, but, 
perversely, not between subdirectories in the same 
native mode partition. Basically. the only way to copy 
a file between subdirectories is to copy it off of the 
disk onto another disk, change directories on the CMD 
device, and copy the file back to the CMD device. For 
the person with a single 5.25 disk drive this can be a 
hassle and they lose the speed and ease of use 
advantages that prompted them to buy the CMD mass 
storage device in the first place. 


DOCUMENTATION 

The manual included with GateWav is the same as that 
with previous versions. There is a small four page 
insert that describes the changes and new features of 
version 2.5. The manual is in general well written, 
although occasionally verbose, and is nicely printed as 
are other CMD manuals. One thing to be aware of: pay 
very close attention to the section on configuring your 
system and first installing GateWay. If you have a 
RAMLink, remember how you had everything set up when 








you make your boot disk. If you make even a change as 
small as switching the REU in a RAMLink from "Normal" 
to "Direct," GateWay will completely fail to boot 
Fortunately, you always have the option of starting 
over from scratch. 


CONCLUSIONS 

GateWay version 2.5 is a solid product. If vou use 
GEOS with any CMD devices or find vourself using the 
"show by name" option of deskTop frequently. or desire 
the power and convenience of the Switcher. then GateWay 
is probably for you. While the lack of date support is 
maddening, the subdirectory support in GateWay. though 
not "enough," is better than is present in any of the 
other alternative deskTops. 


GRADE: B+ 
COST: $29.95 


Creative Micro Designs, Inc. 
PO Box 646 

E Longmeadow MA 01028 
800-638-3263 Orders 
413-525-0023 Information 


THE GEOPUBLISH COMPENDIUM 
A REVIEW 


By JOHN W BROWN 


The line "A guide to using geoPublish with a laser 
printer, even if you don’t own one!" on the cover of 
"The geoPublish Compendium" pretty much sums up what 
this small twelve page booklet is all about. 


The paper masters are printed on a Postscript laser 
printer a at print shop by the author. David B 
Ferguson, using his Commodore computer and geoPublish 
to create the data files. 


This booklet contains a brief tutorial on what 
Postscript is, how to modify Postscript files produced 
by geoPublish to get them ready for the printer, 
(briefly) how to transfer them to an IBM PC disk, 
(briefly) how to print them on a IBM PC at the 
printers, and how the booklet was actually produced. 


The overall look and value of the booklet is good. 
especially considering that the shipping price is 
included in the price of the product. My copy of the 
booklet came with a few additional example sheets. 


If you belong to a major telecommunications network you 
could skip this booklet and find all vour answers 
online. National networks have dedicated Desk Top 
Publishing and Postscript RoundTables where you can 
pick up all the Postscript and Commodore information 
you need. 


Which brings me to the reason why | graded this booklet 
"onlv" a B. The names and addresses of where to find 
the files that he mentions are left as "Q-link". I 
think this is a serious omission. The majority of 
people who could really use this booklet, like our 
readers, do not own modems, so they can not easily get 
access to the files mentioned unless they write to a 
public domain software company (such as Parsec) and 
directly ask for the needed files. 


I am sure most of the sources he did list, including 
himself, would gladly send someone a disk with the 
needed drivers and programs for a buck or two. Though 
I am sure most people would be at a loss on how to 
contact Adobe for their "bible" on Postscript and 
without the ISBN numbers for the books he did mention, 
tracking them down will be a little more work. 


The other negatives were the obvious printing mistakes 
using Postscript geoPublish that would have been 
fairly easy to fix with a little more effort. Since 
the copyright on the booklet is 1991, I would have 
hoped in two years the author would have found time to 
correct the mistakes. If you are going to espouse the 
benefits of using a product and procedure to make a 
printed product, make it visually correct! 


On the plus side, the above words are probably a bit 
too harsh for a $4 product that includes the shipping 
costs. It is a good cost leader for an author that 
wants to get his foot in the door for other products he 
wants to sell you. For $4, you can not go wrong by 
purchasing it. 


Having all the information you need to get started in 
one easy to read booklet will appeal to many people 
that do not feel like looking for it online. Or for 
those that do not want to search through magazines that 
carries columns on the same subject, such as Don 
Lancaster's in Computer Shopper. 


If it were not for these few persnickety details, the 
product would rate a solid "A", but, I just could not 
give it that since the booklet is’about what an 
excellent job you can do using geoPublish on a 
Postscript printer. 


Grade: solid B 
Price: $4 


U.S. funds, CA residents add sales tax, overseas add 
15% for S&H 


GEnie: DiBieF" 
209-883-2550 

Quincy Softworks 

9479 E Whitmore Ave 
Hughson CA 95326-9745 
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DIGI-BLASTER 64 
BY STEVE GOLDSMITH 


PLAY BACK DIGITIZED SOUND ON 

YOUR C64 THROUGH SOFTWARE! 

Have you ever wondered how digital sound is created on 
computers or compact disc plavers for that matter? 
There has not beer much information pub/i ished on 
digital sound plav back. using software. om anv 
computer platforms. Most of the available information 
I have found takes a Rocket Scientist to figure out. 
What I am going to do here is cover plav back of 
digitized sound on a C64 in terms that most programmers 
can understand and use in a wide variety of | 
applications. Even though this sound driver is written 
for the C64, the information provided here is not 
limited to that platform. I have written drivers for 
the C64. C128 in 2MHz 128 mode and IBM PC DOS. I plan 
to do a Z80 driver for C128 CP/M mode too. 


BASICS 

I am sure most of vou know that sound is the movement 
of air molecules caused bv objects that vibrate. A 
good visual example of this would be to take the grill 
off one of your stereo speakers and turn up the music 
If vou watch the bass speaker carefullv vou can see it 
vibrating. The speaker causes the air molecules to 
vibrate your auditory nerves that let vou hear ‘| feel) 
the music. 


Sound can be represented by sine waves. The twe 
components of a sound sine wave are frequency and 
amplitude. Frequency is the number of cvcles per 
second 





Havelength 


One Cycle 


Increasing frequency makes the sound pitch higher and 
decreasing frequency has the opposite effect. 

Amplitude is the Loudness of a sound and determines the 
height of a sine wave. 


Peak 





These =D Zs D 


ae LS 


Peak 


Increasing amplitude makes the sound louder and 

decreasing amplitude has the opposite effect. Real 
sound waves are much more complex than simple sine 
waves. The computer must be able to convert these 
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complex analog signals into digital data. The digital 
data is then converted back to a analog signal that vou 
can hear. This process is called sampling or 
digitizing. 


SAMPLING 

The sampling rate is the frequency at which a digitizer 
grabs a small chunk of sound. The frequencv is usually 
represented in Hertz. Increasing the sampling rate 
improves the quality of the sound and increases RAM 
usage. Decreasing the sampling rate has the opposite 
effect. If you were to record a sound at 16.000 Hertz 
(16KHz) the digitizer would grab 16.000 chunks of data 
per second. The amount of memory required to store the 
digitized image depends on the method implemented. The 
highest quality and most widely used method for 
producing digital play back is called pulse code 
modulation or PCM. Compact Disc (CD) players use 16 
bit PCM at 44KHz. 


The stock C64 could only hold ./4 seconds of mono sound 
sampled at CD player resolution! Actuaily, the C64 is 
not capable of playing 16 bit data directlv or sampling 
at rates of 44KHz. You can get 16 bit PCM digitizers 
for IBM PC class computers with lots of memory and hard 
drive space for about $300.V0 to $400.00. There have 
been some 8 bit PCM digitizers for the C64 and C128, 
but you still suffer from lack of RAM. What we need is 
an efficient sampling method that still produces good 
quality sound. 


Square Wave Format 
The most efficient uncompressed method of digitizing 
sound is the one bit square wave format. 


i bits 





The C64 version of a Covox Voice Master uses this 
method. The digitizer stores either a 1 or 0 bit in 
memory depending on the sound’s amplitude. These 
strings of ls and Os determine the sound’s waveform. 
The highest frequency possible would look like 01010101 
and a lower frequency would look Like lLOOC1OOO. Data 
in this format can be played back through the C64'’s SID 
chip using software! 


DIGI-BLASTER 64 

Digi-Blaster 64 was created because |] was disappointed 
with the play back qualitv of the software that came 
with the C64 version of The Covox Voice Master. Even 
using its highest sampling rate :12KHz: the quality was 
poor, so I set out to write mv own Assembler modules to 
record (maybe I will cover this in another article) and 
play back sounds. What I ended up with are modules 
capable of 25KHz sampling on a 1MHz C64! The Assembler 
moduie DB64.ASM plays back one bit square wave data. 


The way it works is to read a bit of sample data per 
cycle. If the bit is a 1 then set the SID chip’s 


: master volume control at $D418 to the value stored at 


volume control to QO. 


location SA9. If the sample bit is O then set the 
This rapid flipping on and off of 
the volume control vibrates the speaker and creates the 


sound. Since this process involves intensive real-time 


_ processing we have to disable interrupts and blank the 


screen before entering the processing loop. tou can 
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play back sound with the screen visible. but vou lose 
sound quality. For more detailed information on the 
workings of DB64.ASM read the documented source code. 


CALLING DB64.0BJ 
You need to do a few things before calling DB64.OBJ: 


1.Set locations $A3 and SA4 to sample the starting 
address in lo/hi format. 

2.Set locations $A5 and $A6 to the sample length 
in lo/hi format. 

3.Set location $A7 to the sampling rate The sampling 
rate formula is 255-PEEK(16/) clock cvcles. 

4.Set location $A9 to the volume for | bits of sample 
data. Volume must be between 1 and L5. 

5.Call DB64.0BJ at $COOO. 


To call the routine from your own BASIC program just 
load DB64.0BJ. load your digitized fileis:. set the 
locations listed above with POKE statements and SYS 
49152. I use this method for my player program 
DB64.BAS. 


ASSEMBLER PROGRAMMERS 

Proficient 6502 Assembler Programmers will be able to 
exploit the power of DB64.ASM! DB64.ASM is written 
with Rebel Assembler in C64 mode. but the source code 
can be easily converted to manv 6502 Assembler formats. 
You can change the origin of the DB64.O0BJ file if vou 
need to use memory in the $COOO - SCFFF range. utilize 
the C64's MMU to stuff digitized data under the Kernal 
and BASIC ROMs and flip them out for play back. create 
real-time effects like echo. fade-in. fade out. etc. 
etc. The possibilities are onlv Limited te vout 
imagination and programming experience. I will cover 
some of these techniques in future articles. 


SOUND SOURCES 

There are many sources of digitized sounds. You can 
make your own sound files with the C64 version of The 
Covox Voice Master or any digitizer that creates the 
same one bit square wave format. The sound files used 
by DB64.BAS were created with a Sound Blaster Pro on a 
IBM PC running under MS DOS. I used a 16KHz sample 
rate with a low - 3.2KHz filter. I then converted the 
8 bit PCM file to a 1 bit square wave file with a sound 
editor I’m working on and transferred the files to my 
128D with Big Blue Reader 128. Ina future article I 
will cover converting 8 bit PCM VOC files created with 
the Sound Blaster, Covox Sound Master II, ete. to 4 bit 
PCM and 1 bit square wave files that can be plaved back 
on the C-64 and C-128. That way you can download some 
of the most popular 8 bit PCM sound formats from GEnie, 
local BBSs, etc. without even owning a digitizer. 


SUMMARY 

I have only scratched the surface of digital sound 
processing without going into Statistics or valculus 
IIL. Hopefully after reading this article and running 
the sample programs you have gained a basic 
understanding of this complex subject. I suggest you 
experiment (play) with the DB64.BAS and DB64.ASM source 
code to get a feel of what the C64 is really capable of 
doing. In BASIC try decreasing the volume at location 
SA9 from 15 to 1 in steps of 1 and plaving the same 
digitized sound each time vou decrease the volume to 
produce an echo effect. Once you get good vou should 
be able to make the aliens in vour game sav "Prepare to 
Die Earth Scum!" with echo instead of just making a SID 
sound effect! You can send me E-mail on GEnie at 
address S.GOLDSMITH2. I hang out in the Commodore 
Flagship, CP/M, Borland and MS DOS areas. 
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If you want some good examples of programs that utilize 
the techniques described in this article and have 
access to GEnie or local BBSs in the Sarasota, Florida 
(813) area code download: 


DSS1.SDA 

Digital Sound Samples is a long playing music sampler 
for the C64. 

By Steve Goldsmith 


DSS2.SDA 
Digitized music files needed bv DSS1.SDA 


DIGISND.SDA 

DigiSound is a animation and digitized sound demo for 
the C64. 

By Steve Goldsmith 


VEPLAY. ZIP 

Voice Editor Player Demo plays digitized voice. music 
and game sound effects for the IBM PC running DOS. 

By Steve Goldsmith 


PROGRAM NAME: DB64.BAS 


aj LU Tren ==S==== == =sSSSSSS SSS SSS SSS SS SS 


@ 
2) 
iW) 
oO 


rem digi-biaster 654 :.: Ji, 24°93 

gb 30 rem (c) 1993 by parsec inc 

ek 40 rem all rights reserved 

db 50 rem =SSSsSsSs=ssSHssssssssssssssssssss 

fb 60 on rs goto 160,240 

bm 70 gosub 440 :rem display title 

db 80 gosub 520 :rem get disk device # 

kl 90 gosub 610 :rem set up file names 

ll 100 rs = 1 :rem run state = load first play file 

ol 110 poke 167,127 :rem sample rate 

ca 120 poke 169,15 :rem high bit volume 

ho 130 print"loading play back module...” 

cf 140 print 

mj 150 load"db64.obj" dv,1l 

mad 160 print “playing files...” 

im 170 rs = 2 :rem run state = play file 

jb 180 if £S5(f£)="end" then end 

en 190 getas 

pe 200 if aS<>"" then end 

pe 210 print fS(f); 

cl 220 print leftS (" * 17-Len 
(f5(f£))); 

je 230 load f£S(f),dv,1 

cf 240 gosub 270 :rem play file 

bd 250 f£ = ftl 

li 260 goto 180 :rem get next file 


nn 270 sl = 0 :rem start lo 
ik 280 sh = 194 :rem start hi 
li 290 s = sh*256+s1 :rem start addr 
fp 300 el = peek (174) :rem end lo 

mn 310 eh = peek (175) :rem end hi 

je 320 e = eh*256tel :rem end addr 
ni 330 l1 =e-s :rem Length 

hf 340 ll = 1-(1/256)*256 :rem Length lo 
hp 350 lh = 1/256 :rem Length hi 


km 360 print s;e;l :rem print info 

jn 370 poke 163,sl :rem start address lo 
kn 380 poke 164.sh :rem start address hi 
ig 390 poke 165,11 :rem length lo 

nc 400 poke 166,lh :rem length hi- 

ci 410 sys 4915Z :rem call play module 
oh 420 poke 54296,0 :rem volume = 0 

dn 430 return 

mj 440 poke 53280,0 :rem border color 

nce 450 poke 53281,0 :rem screen color 

go 460 print chrS (147);chrS (14);chrS (5) 
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fm 470 print"Digi-Blaster 64 1.1" nj 430 sambyt = Sa8 ;sample byte 


ce 480 print”” hm 440 samamp = SaQ ;volume for high bit 
dj 490 print"Commercial Software from" po 450 ; 
cf 491 print"TC-128/64 Issue #34 " ef 460 * = Sc000 ;origin of program 
jn 492 print"copyright 1993 by ? ck 470 :file @0:db64.obj,8 ;make obj file 
bo 493 print"Parsec, Inc. c bm 480 ; 
le 494 print"PO Box lil . ko 490 ;play back 1 bit uncompressed 
ia 495 print"Salem, MA 01970-0111 7 de 500 ;square wave sample through sid 
pe 496 print"USA 7 dk 510 ; 
di 500 print"” fl 520 ;before calling play set: 
in 510 return cm 530 ;samsta = start of sample 
kd 520 print jb 540 ;samlen = Length of sample 
ff 530 print "Disk device number: "; bp 550 ;samrat = clock cycles 
gd 540 open 1,0 mo 560 ;samamp = volume for 1 bits 
ci 550 input# 1,dvs hh 570 ; 
de 560 close 1 ic 580 play = * 
nf 570 print ja 590 sei ;disable irg 
np 580 dv = abs (val (dvS)) om 600 lda viccr ;read vic control reg 
ha 590 if dv<8 or dv>15 then 520 | ne 610 and 411101111 ;blank screen mask 
oi 600 return hp 620 sta viccr ;blank screen 
de 610 nf=8 ja 630 lda icr2 ;clear icr flag bits 
nf 620 dim fS(nf) in 640 lda #S7f 
fd 630 for i=0 to nf hb 650 sta icr2 ;nothing will trigger interrupt on ciaz 
ae 640 read £S(i) fi 660 lda samrat ;timer latch value 
ao 650 next kk 670 sta timea2 ;set timer latch lo 
ce 660 return le 680 ldy #S00 ;zero samsta index 
mn 670 rem file names cd 690 sty timea2+l ;set timer latch hi 
gn 680 data db64.sam ei 700 lda 200010001 ;cia 2 control register bit 
hn 690 data sgl.sam ; settings: 
cf 700 data guitarl.sam ad 710 ; 
dh 710 data guitarZ.sam nh 720 ;0 1 start timer 
jp 720 data sg2.sam go 730 ;1 0 no timer a output on pb6 
fd 730 data guitar3.sam km 740 ;2 0 pulse bit 6 one cycle 
gi 740 data guitar4.sam dk 750 ;3 0 continuous run mode 
mb 750 data sg3.sam lh 760 ;4 1 force Latch load 
ab 760 data end 11 770 ;5 0 count machine cycles 
di 780 ;6 0 serial input mode 

PROGRAM NAME: DB64.ASM mg 790 ;7 0 tod clock 60 hz 

. fo 800 ; 
ia 100 ; SSSSSsssSsssa SS SSS SS SSS SSSSSaSaa= . gp 810 sta cra2 ;start timer 
ok 110 ;digi-blaster 64 1.1 fc 820 repl lda (samsta),y ;repeat get sample byte 
lj 120 ;digitized sound player 01/24/93 bb 830 sta sambyt ;move to 0 page 
bp 330 ;(c) 1993 by parsec inc po box 111 nd 840 ldx #S08 ;count 8 bits 
lp 131 ;salem ma 01970-0111 usa me 850 rep2 ida icr2 ;load icr 2 irq status 
fk 140 ;all rights reserved lh 860 and #S01 ;test interrupt bit 
le 150 ; S=SSssS=sessSSsSSSSSSSssSSsSSssses= gi 870 beq rep2 ;until timer interrupt flag set 
nl 160 ; nd 880 asl sambyt ;get amp bit 
lk 170 :designed to play back sound de 890 lda samamp ;get ls bit volume 
eg 180 ;sampled with covox voice master oc 900 bcs elsel -if carry flag = 0 then 
hn 190 :or other uncompressed 1 bit ga 910 lda #S00 ;set U bit volume 
ig 200 ;square wave formats. ec 920 elsel sta sidvol ;else set 1 bit volume 
an 210 : bb 930 dex ;count down bits left to play 
ia 220 ;rebel 64 assembler format kj 940 bne rep2 ;until no more bits 
cb 230 : he 950 lda samlenti 
ao 240 ;cia chip mn 960 bne else2 :if last block then 
df 250 ; dm 970 cpy samlen ;check if last byte 
ne 260 timea2 = Sdd04 ;cia 2 timer a lo byte ia 980 beg untill 
pb 270 icr2 = SddOd ; cia 2 interrupt control register ek 990 else2 iny ;else set up to read next block 
mo 280 cra2 = SddOe ;cia 2 control register a ha 1000 bne repl 
fo 290 :; dk 1010 inc samstatl ;set up to read next block 
hj 300 vic chip jn 1020 dec samlentl ;count down blocks to play 
he 310 ; lg 1030 jmp repl 
kj 320 viccr = Sd011 ; vic 2 control register op 1040 untill lda viccr ;until last byte played 
ig 330 ; eh 1050 ora 200010000 ;unblank screen mask 
jp 340 ;sid chip df 1060 sta viccr ;unblank screen 
jk 350 : eo 1070 cli ;enable irg 
po 360 sidvol = $d418 ;sid master volume control . cp 1080 rts 
ko 370 ; ae 1090 :end 


bj 380 ;0 page memory used by play routine 
mc 390 ; 
da 400 samsta = Sa3 ;sample starting addr 


ob 410 samlen = Sa5 ;sample length 
do 420 samrat 


Sa7 ;sample rate = clock rate 
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TuRBO CHARGING CP/M 
WITH SG TOOLS 
PROGRAMMER’S TOOL Box 


BY STEVE GOLDSMITH 


Part 3 of 3 


INTRODUCTION 

We made it! This final installment of SG Tools will 
complete our journey through the strange world of C128 
CP/M tool box programming in Turbo Pascal. Along the 
way I hope you learned that CP/M applications on the 
C128 do not have to be extremely slow, boring and 
unusable! The SG Tools package gives you a good set of 
C128 tools to build on and customize as needed. 


OVERVIEW 

Last time in #33 we found that it is easier to remember 
variables and constants when we use prefix and/or 
suffix naming conventions for each module. The VDC 
screen manager VDCSCMGR.INC has all the primitives 
needed to control the VDC in a page flipping 
environment. Most tool boxes contain some sort of fast 
write procedure that accesses the video hardware 
directly instead of using the BIOS or other system 
level interfaces. SG Tools is no exception with its 
VDCFW.INC module that allows fast string writes without 
BIOS or BDOS assistance. Window modules like 
VDCWIN.INC allow the development of modern Graphic User 
Interfaces (GUI) with Common User Access (CUA) under 
CP/M. 


This time we are going to cover BDOS calls, reading, 
viewing and selecting CP/M file names, efficiently 
reading and viewing CP/M text files, building 
applications and customizing SG Tools. 


Here is our latest SG Tools module hierarchy: 


VDC . INC PORT . INC BDOS . INC HEXSTR.INC NUMSTR.INC 
VDCCONST . INC TIMER . INC KEYIN. INC 
VDCSCMGR . INC DIR.INC 
VDCFW. INC READTF . INC 
VDCSCRL. INC 
VDCWIN . INC 
DIRSEL . INC 
FVIEW. INC 
VDCMSGB . INC 


BDOS CALLS 

Turbo Pascal has a built-in function called BDos that 
allows access to CP/M's BDOS file system. The format 
1s: 


ReturnCode := BDos (FuncNum, Parameter): 


It is essential to have a CP/M Programmer's guide to 
fully understand all the BDOS data structures. function 
numbers, parameters to pass and return codes. The 
BDOS.INC module defines all the BDOS constants we will 
be using. You can easily add new function numbers and 
parameters to BDOS.INC when vou need them. I have also 
included some handy Pascal types for file names. 


extensions, paths, DMA (direct memory access) buffers 
and FCBs (file control blocks). The best examples of 
using the BDos functions are in the DIR.INC module. 


READING CP/M DIRECTORIES 

It is often very useful to be able to read a directory 
into memory rather than relying on error prone user 
input. The DIR.INC directory module reads a directory 
from the specified drive and user into a double linked 
list structure. If you are new to dynamically 
allocated memory structures using the heap then I 
suggest you read one of the many Turbo Pascal books 
available on this subject. I would love to explain the 
concept in full, but it is beyond the scope of this 
article. 


Basically, a linked list allows efficient use of memory 
because it is allocated at run time as needed. DIR.INC 
also allows you to specify which files to select using 


files. ????7??2?2??.COM just for COM files or A???????.ASM 
for all ASM files that start with A. DIR.INC can be 
used on any Z80 CP/M box, not just the C128. Examples 


of using DIR.INC are in the DIRSEL.INC module. 


READING CP/M TEXT FILES 

Reading a text file into an arrav of strings is one of 
the easiest tasks a programmer can do. However. doing 
it efficiently is another story all together. The 
problem is that even if you dynamically allocate each 
line as a Pascal style string you end up wasting the 
unused portion of the string. For example, let’s say 
you want to write a text file browser with a maximum 
line length of 80 characters. The first line may be 78 
characters, so only 2 bytes are wasted, but what if the 
next line is just a 5 character word? Well, you just 
wasted /5 bytes! This method also forces you to have 
the same maximum amount of 80 character strings in free 
memory. The way around this problem is by allocating 
just enough memory to hold each string on a string by 
string basis. The READTF.INC read text file module 
does just that! It stores the text lines in a very 
Similar manner to DIR.INC, but instead of fixed length 
strings we will be using dynamically allocated length 
strings. READTF.INC can be used on any Z80 CP/M box or 
even an MS- DOS box for that matter. Examples of using 
READTF.INC are in the FVIEW.INC module. RTFDOS.PAS on 
the TC-128 #34 disk is a MS-DOS program that uses 
READTF.INC to read and display the RTFDOS.PAS file. 


RAW KEYBOARD INPUT 

It is sometimes desirable to avoid using Turbo Pascal's 
Read and Readln for input because they both echo 
characters to the screen. You can see examples of 
using the Read function in the programs from TC-128 
#33. What we need is a function like Commodore BASIC’s 
GET AS which fetches a character from the keyboard 
buffer. We do this in CP/M with a simple BDOS call. 
The GetKey function waits until a kev is pressed and 
returns a byte value representing the key pressed. To 
convert the value to a character use C := Chr (GetKey). 
I have also included the keyboard control code 
constants you get when you press the CONTROL key with 
and another key. Examples of using KEYIN.INC are in 
the DIRSEL.INC and FVIEW.INC modules. 


SCROLLING VDC WINDOWS 

The WINDOWS.PAS program from last time featured a 
window scrolling text data from left to right. I 
basically just redrew the whole window each time which 
was quite slow. The VDCSCRL.INC module allows vou to 
scroll a VDC window up or down one line without 
redrawing the whole window! I have also provided a 
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procedure to clear windows. The big increase in speed 
comes from using the VDC’s block copy and block write 
features. Examples of using VDCSCRL.INC are in the 
DIRSEL.INC and FVIEW.INC modules. 


SELECTING FILE NAMES 

Many CP/M programs like SWEEP and NULU are able to load 
and display CP/M directories. Their file selection or 
tagging processes are quite outdated compared to 
today's user interfaces. Most users just want to pick 
from a list of file names that pop up in a window. The 
pick list should let users scroll through the file 
names with the top cursor keys, let them press the 
RETURN key to select a file name, or the ESCape key to 
exit. DIRSEL.INC is the file name pick list I just 
described. DIRSEL.INC reads the current directory by 
default, but you can easily modify the InitDirSel 
procedure to read any drive and user. Examples of 
using DIRSEL.INC are in the QVIEW.PAS program. 


VIEWING TEXT FILES 

I know that there are a lot of CP/M text viewers and 
editors, but they all suffer from being too slow on the 
C128. Most of the time it’s not the program’s fault, 
so what can we do? We write a fast VDC text file 
viewer. FVIEW.INC reads a text file into memory, 
displays the text in a window and allows you to browse 
through the file with your top cursor keys until you 
press the ESCape to exit. The left and right scrolls 
are considerably slower than the up and down scrolls 
because I’m redrawing the window each time. You can 
apply the same techniques found in VDCSCRL.INC to left 
scrolls, but it doesn’t apply to right scrolls. The 
VDC's block copy will not allow some source and 
destination overlaps. Block copy moves the first byte 
fine, but the next source byte is the last destination 
byte during a one byte right scroll. You end up coping 
the first byte into all the destination addresses. You 
can over come this with a buffer that is not in the 
source or destination addresses, but it is more 
complicated than VDCSCRL.INC. 


MESSAGE BOX 

The VDCMSGB.INC module is a simple VDC window that 
displays a short message. No word wrapping is 
performed, so long strings will over write areas 
outside the window. 


CONVERTING NUMBERS TO STRINGS 

The TC-128 #32 disk had a program called PORT128.PAS 
that displayed 1/0 addresses in hexadecimal. It used a 
module called HEXSTR.INC that converts bytes and 
integers into a hex string. Likewise, the NUMSTR.INC 
module converts bytes and integers to right justified 
decimal strings. Both modules are quite simple and can 
be found in many string tool boxes. 


BUILDING APPLICATIONS 

Building bug-free professional looking applications is 
the dream of everv programmer! Making it reality 
requires a lot of planning before and during the coding 
process. No, I do not mean spending a month doing a 
300 page flow chart, data flow diagrams, etc. Most of 
the time you can sketch out the features on a piece of 
paper and start the coding/testing/debugging cycle soon 
afterwards. If you are approaching a verv large and 
complex application I suggest using a modern CASE 
(Computer Aided Software Engineering) tool for help. 
Here are some basic rules I follow when designing 
applications: 
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Design reusable modules when possible. I don’t know 
how many times I've seen code that cannot be reused by 
many different programs. This is usually caused by 
lazy programming habits. Some programmers make super 
procedures (mini programs) that combine several tasks 
instead of taking the time, analyzing the code, 
breaking each task out and making procedures more 
modular and reusable. Notice, for example, that VDC 
specific code is not coded directly into the DIR.INC 
and READTF.INC modules. 


If an algorithm already exists don’t recreate the 
wheel! There is a large amount of Turbo Pascal source 
available via TUG, GEnie, BBSs, PD mail order, etc. In 
other words, don’t write a general data compression 
routine from scratch if you have access to LZW or other 
PD source code. Sometimes you have to port code from 
other languages, but it still beats writing code from 
scratch! 


Use Assembler (or inline code) only when fast execution 
speed is important or if there is no other way to 
accomplish the task. This was a hard habit for me to 
break since I started Assembler programming on a 5K 
VIC-20 in 1981. Back then you had to use Assembler 
code all the time because of memory and speed 
limitations. I would have to say that I am many times 
more productive using a structured high level language 
rather than using Assembler for the same task. SG 
Tools was written with only four inline machine code 
routines! Please don’t think I’m anti- Assembler 
because I'm not. It just doesn’t make sense to spend 
the extra time using Assembler in situations where high 
level code works fine and is more portable. 


Portability is a big issue these days. Many 
programmer's want their code to run on many different 
platforms without a lot of modification. SG Tools was 
designed just for the C128, but you could emulate the 
VDC on a IBM, Amiga or Mac if you wanted to port SG 
Tools. Actually, it is much easier to make generic 
routines that work on each individual system. For 
example, instead of using FWriteVDC call the procedure 
FastWrite and write the platform specific code for each 
machine as needed. That way you know that FastWrite 
will work the same on all platforms. Both the DIR.INC 
and RTFILE.INC modules are portable to other systems 
that have Turbo Pascal compilers. See the RTFDOS.PAS 
program on the TC-128/64 #34 disk for an example of 
using READTF.INC to read MS-DOS text files. 


QUICK VIEW 

The best way to teach you how to build an application 
with SG Toois is to have one that utilizes most of the 
modules. Quick View (QVIEW.PAS) is a great working 
example of how to use SG Tools. First, we initialize 
the VDC and draw the desk top with the Init procedure. 
Next, we call the Run procedure which allows the user 
to keep viewing different files until the directory 
selector is exited with escape. The Done procedure 
does all the clean up and restores the VDC. The Init, 
Run and Done model applies to just about any module or 
program in any language. I use this structure in many 
SG Tools modules and programs. You mav want to add 
some features to Quick View such as: Go directly to 
the top, bottom, left or right of the file, speed up 
left and right scrolls, use a swap file instead of a 
linked list to create arrays as large as the disk, 
PETSCII conversion, etc. 


CUSTOMIZING SG TOOLS 
One important feature of any tool box is the ability to 
customize it to your own needs. 1 kept this in mind 
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before, during and after the development of SG Tools. bdosDMABuf = array[0..127] of byte: 
For example, ANIMATE.PAS uses its own page flip and bdosPFCBRec = bdosFCBRec; 
character display procedures for speed. TCSLIDE.COM on bdosFCBRec = record 
the TC-128 #33 disk uses an event manager, menus, PCX Drive : byte; 
image decoding and VDC bit map display modules I added FileName : array{0..7] of char; 
to SG Tools. When adding your own modules remember to FileType : array[0..2] of char; 
use unique prefix or suffix naming, so you don’t end up Extent : byte; 
with duplicates. If you change existing modules ask Reservedl : byte; 
yourself how it will impact other programs and modules. Reserved2 : byte; 
Other than that, just use your imagination and go wild! RecCount : byte; 

Reserved3 : array[0..15] of byte; 
FINAL THOUGHTS CurrentRec : byte; 
SG Tools is your door to C128 CP/M applications that -RandomRec : array[0..2] of byte 
are not only as good as native mode programs, but even end; 


better in areas such as portability, maintainability, 
development time, etc. The C128 CP/M mode has very few 


programs that take full advantage of the hardware PROGRAM NAME: DIR. INC 

compared to native 128 mode and GEOS programs. This is 

one of the reasons I wrote SG Tools because I’m sure SG Tools (C) 1992 Parsec, Inc. 

that there are a lot of programmers and users who want 

new uses for CP/M mode and the 128 in general. Think The Directory module reads a CP/M directory into a double 
of SG Tools as a application programmer’s interface linked list structure. 

(APL) that sits on top of a CP/M engine. Windows for No memory allocation error trapping. READTF.INC uses such 
the PC makes use of DOS for many functions, so why not error trapping. 


apply the same thing on a smaller scale to SG Tools and 
CP/M. Most of all enjoy yourself! 
type 
If you have any questions or ideas, send me a message 
on GEnie at address S.GOLDSMITH2. Until next time... dirPRec = dirRec; 
dirRec = record 


FileName : string [12]; 


PROGRAM NAME: BDOS.INC Prev, 
Next : dirPRec; 
SG Tools (C) 1992 Parsec, Inc. end; 
Common BDOS constants “var 
dirCurDrive, current drive 
BDOS function numbers dirCurUser : byte: current user 
dirError, error codes 
const dirRecs : integer; records read 
dirDMAPtr : bdosPDMABuf; dma buffer 
bdosDirectCon = $06; dirFCB : bdosFCBRec default fcb 
bdosSelectDisk = S0e; absolute bdosDefaultFCB; 
bdosSearchFirst = $11; dirFirstPtr, first record pointer 
bdosSearchNext = $12; dirCurPtr : dirPRec; current record pointer 
bdosCurrentDisk = $19; 
bdosSetDMAAddr = Sila; procedure InitDir (Drive, User : byte; 
bdosUserCode = $20; WildCard : bdosPathStr) ; 
bdosSetErrorMode = S24; 
var 


error modes 


I: byte; 
bdosRetErrMode = Sff; 
bdosRetDispErrMode = Sfe; begin 
bdosDefErrMode = Sfd; dirRecs := 0; 
dirDMAPtr := nil; | init pointers 
direct console I/O modes dirFirstPtr := nil; 
dirCurPtr := nil; 
bdosConInStat = Sff; dirError := set bdos error mode to return 
bdosConStat = Sfe; error 
bdosConIn = Sfd; BDos (bdosSetErrorMode ,bdosRetErrMode) ; 
dirCurDrive := . 
BDOS memory Locations BDos (bdosCurrentDisk); save current drive and user 
dirCurUser := 
bdosDefaultFCB = S5c; BDos (bdosUserCode,Sff); 
. dirError := 
type BDos (bdosSelectDisk,Drive); select drive to read 
if dirError = 0 then 
bdosNameStr = string[8]; , begin 
bdosExtStr = string[4]; dirError := 
bdosPathStr = string[15]; BDos (bdosUserCode,User); select user to read 
bdosPDMABuf = bdosDMABuf; I dirFCB.Drive := 0; use default drive 
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for I := 0 to 7 do set wild card 
dirFCB.FileName[TI] WildCard[I+1]; 

for I := 0 to 2 do 
dirFCB.FileType[T] WildCard[I+10] ; 

New (dirDMAPtr) allocate dma buffer 


end 


end; 


procedure DoneDir; 


Var 


TempPtr : dirPRec; 


begin 
if dirDMAPtr <> nil then 
Dispose (dirDMAPtr) ; dispose dma buffer 
if dirFirstPtr <> nil then dispose linked list structure 
begin 
dirCurPtr := dirFirstPtr; 


repeat 


TempPtr := dirCurPtr.Next; 
Dispose (dirCurPtr); 
dirCurPtr := TempPtr 


until dirCurPtr = nil 


end; 

dirError := select previous drive 
BDos (bdosSelectDisk,dirCurDrive) ; 

dirError <= select previous user 


BDos (bdosUserCode,dirCurUser); 
dirError := set bdos error mode to default 
BDos (bdosSetErrorMode , bdosDefErrMode ) 


end; 
function PackName (U : bdosPathStr) : bdosPathStr; 
var 

I: byte; 


begin 
repeat delete spaces from file name 
i s= Pos (* ~,0); 
if I <> 0 then 
Delete (U,I,1) 
until I = 0; 
PackName := U 


end; 


procedure ReadDir; 

var 
FCBPtr : bdosPFCBRec; 
TempPtr : dirPRec; 


begin 
dirError := set new dma address 
BDos (bdosSetDMAAddr ,Addr (dirDMAPtr)); 
dirError := read fisrt dir fcbs 


BDos(bdosSearchFirst,Addr (dirFCB)); 
if dirError <> Sff then 


begin 
New (dirCurPtr); allocate first dir record 
dirCurPtr.Prev := nil; first record’s prev is nil 


dirFirstPtr := dirCurPtr; 


while dirError <> Sff do read and allocate remaining records 


begin 
dirRecs := dirRecst1; 
FCBPtr := pointer to fcb in dma buffer 
Ptr (Addr (dirDMAPtr)t+dirError shl 5); 
dirCurPtr.FileName := make file name 
FCBPtr.FileNamet’ .'’+FCBPtr.FileType; 
dirError := bdos search for next dir entry 


BDos (bdosSearchNext); 
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if dirError <> Sff then 


begin 
TempPtr := dirCurPtr; save cur record pointer 
New (dirCurPtr); allocate new record 


TempPtr.Next := dirCurPtr; set links 
dirCurPtr.Prev := TempPtr 


end 
end; 
dirCurPtr.Next := nil last record’s next pointer is nil 
end; 
dirError := set default dma address 


BDos (bdosSetDMAAddr , bdosDefaultFCB) 


end; 
function GetFileName : bdosPathStr; 


begin 
if dirCurPtr <> nil then 


begin 
GetFileName := dirCurPtr.FileName; get current file name 
dirCurPtr := dirCurPtr.Next set up for next record 
end 
end; 


PROGRAM NAME: DIRSEL. INC 
SG Tools (C) 1992 Parsec, Inc. 
Directory Selector uses a VDC window to select a CP/M file 


from the currently 


Logged disk. 


const 
dselXSize = 16; window size 
dselYSize = 15; 
dselCurSize = 14; 

var 


dselX1, dselY1, dselX2, dselY2, 
dselCY, dselAttr : byte; 
dselCurPtr : dirPRec; 


procedure DispDir; 


var 


X, Y : byte; 


begin fill window with file names 
X := dselX1+2; 
Y := dselYit2; 
repeat 
FWriteVDC (X,Y,dselAttr,GetFileName) ; 
Y := Y+1 
until (dirCurPtr = nil) or 
(Y = dselY2-2) 


end; 


procedure DispCur (A : byte); 


begin draw cursor 
FillAttrVDC (dselX1+1,dselCY,dselCurSize,A); 


end; 
procedure ScrollUpDir; 


begin scroll window up 
ScrollUpVDC (dselX1+1,dselYit3, 
dselX2-1,dselY2-3); 
FWriteVDC (dselX1+2,dselY2-3, 





dselAttr,dselCurPtr.FileName) WildCard); 
end; if dirError = 0 then 
begin 
procedure ScrollDownDir; ReadDir; 
if dirRecs > 0 then 
begin scroll window down : begin 
ScrollDownVDC (dselX1+1,dselY1+tz, dirCurPtr := dirFirstPtr; 
dselX2-1,dselY2-4); | . dselCurPtr := dirFirstPtr; 
FWriteVDC (dselX1+2,dselY1+2, : dselX1 := X1; 
dselAttr,dselCurPtr.FileName) dselY1 := Y1; 
end; dselX2 := Xlt+dselxXSize-1; 
dselY2 := YitdselYSize-1l; 
procedure MoveCurUp; dselCY := Y1+2; 
dselAttr := A; 
beeen move cursor up DrawWinVDC (dselX1,dselY1,dselX2,dselY2,dselAttr, 
DispCur (dselAttr); Chr (dirCurDrivet65)+Chr (dirCurUsert48)+’:’): 
if (dselCurPtr.Prev <> nil) and | FWriteVDC (dselXi1+1,dselY2-1, 
(dselCY > dselYit+1) then vdcAltChrSettvdcWhite,IntStr (dirRecs)+’ Files’); 
begin DispDir; 
dselCurPtr := dselCurPtr. Prev; DispCur (dselAttrtvdcRvsVid) 
if dselCY = dselY1+2 then end 
ScrollDownDir end 
else end; 
dselCY := dselCY-1 
end; procedure DoneDirSel; 
DispCur (vdcRvsVidtdselAttr) ; 
FlipPageVDC begin 
end; DoneDir 
end; 
procedure MoveCurDown ; 
begin move cursor down PROGRAM NAME: FVIEW. INC 
DispCur (dselAttr); 
if (dselCurPtr.Next <> nil) and SG Tools (C) 1992 Parsec, Inc. 
(dselCY < dselY2-2) then 
begin File View allows you to view a text file in a VDC window. 
dselCurPtr := dselCurPtr.Next; 
if dselCY = dselY2-3 then 
scrollUpDir var 
else 
dselCY := dselCY+1 fvX1, fvY1, fvX2, fvY2, fvCol, 
end; fvXSize, fvYSize, fvAttr : byte; 
DispCur (vdcRvsVidtdselAttr) ; _ fvCurPtr, fvTopPtr, fvBtmPtr : rtfPLine: 
FlipPageVDC 
end; return line with current column offset 
function SelFileName : bdosPathStr; function DispLine (Old : rtfStr) : rtfStr; 


var begin 


if Length (Old) >= fvCol then 


C : byte; Old := Copy (Old,fvCol, fvXSize-2) 
else . 
begin Old gets 
repeat DispLine := Old 
C := GetKey; end; 


case C of 
kbCtrlE : MoveCurUp; fill window with lines starting at current line pointer 


kbCtrlX : MoveCurDown 


end procedure DispWin; 
until (C = kbCtr1M) or (C = kbEsc); 
if C = kbCtr1M then | var 
SelFileName := PackName (dselCurPtr.FileName ) 
else X, Y : byte; 
SelFileName := ’’ » 2 §Etistr: 
end; 
begin 
procedure InitDirSel (X1,Y1,A : byte;  Y := £vYi+l; 
WildCard : bdosPathStr) ; X := fvX1t+ti; 
repeat 
begin Ss := DispLine (GetLine); 
InitDir ( read dir of default drive/user LE OS) 7° phen 


BDos (bdosCurrentDisk), 
BDos (bdosUserCode,Sff), 
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FWriteVDC (X,Y,fvAttr,S); begin 
Y := Y+l repeat 
until (rtfCurPtr = nil) or C := GetKey; 
(Y = fvY2) case C of 
end; kbCtrlE : MoveUpLine; 
kbCtr1lX : MoveDownLine;: 
procedure MoveUpLine; kbCtr1D : MoveLeftLine; 
kbCtr1S : MoveRightLine 
begin end 
if fvTopPtr.Prev <> nil then until (C = kbCtr1M) or (C = kbEsc) 
begin end; 
fvTopPtr := fvTopPtr.Prev; 
fvBtmPtr := fvBtmPtr. Prev; procedure InitViewFile (X1,Y1,X2,Y2,A : byte; 
fvCurPtr := fvTopPtr; FileName : bdosPathStr); 
ScrollDownVDC (fvX1+1,fvY1+1, 
fvX2-1,fvY2-2); begin 
FillDispVDC (fvX1+1, fvY1+1, fvX1 := X1; 
fvxXSize-2,32); fvY1 := Y1; 
FWriteVDC (fvX1+1,fvY1+l1, fvX2 := X2; 
fvAttr,DispLine (fvCurPtr.Line)); fvY2 := Y2: 
FlipPageVDC fvXSize := X2-X1+1; 
end fvYSize := Y2-Y1+1; 
end; fvCol := 1; 
fvAttr := A; 


InitReadFile (FileName) ; 
if rtfError = 0 then 


procedure MoveDownLine; 


begin 
ReadFile; 
DrawWinVDC (fvX1,fvY1, fvX2,fvY2,fvAttr,FileName); 


begin 
if fvBtmPtr.Next <> nil then 


begin 
fvTopPtr := fvTopPtr.Next; rtfCurPtr := rtfFirstPtr; 
fvBtmPtr := fvBtmPtr.Next; fvTopPtr := rtfFirstPtr; 
fvCurPtr := fvBtmPtr; DispWin; 
ScrollUpvDC (fvXitl1, fvY1+z, fvCurPtr := rtfCurPtr; 
fvX2-1,fvY2-1); fvBtmPtr := rtfCurPtr.Prev; 
FillDispVDC (fvX1+1,fvY2-1, FlipPageVDC 
fvXSize-Z, 32); | end 
FWriteVDC (fvXit1,fvY2-1, end; 
fvAttr,DispLine (fvCurPtr.Line)); 
FlipPageVDC procedure DoneViewFile; 
end 
end; begin 
DoneReadFile 
procedure MoveLeftLine; end ; 
begin 
if fvCol < rtfMaxStr then PROGRAM NAME: KEYIN.INC 
begin 


rtfCurPtr := fvTopPtr; SG Tools (C) 1992 Parsec, Inc. 


fvCol := fvColtl; 

ClearWinVDC (fvX1t1, fvY1t1, fvX2-1, fvY2-1,32); The Keyboard Input module allows raw CP/M input. 
DispWin; 
FlipPageVDC 

end const 


end; 
CP/M keyboard mapping 


procedure MoveRightLine; 


kbCtrlA = 1; kbCtrl1B = 2; kbCtrlC = 3; kbCtrlD = 4; kbCtrlE = 5; 
heeta kbCtrlF = 6; kbCtrlG = 7; kbCtrlH = 8; kbCtrlI = 9; kbCtrlJ = 10; 


if fvCol > 1 then kbCtrl1K = 11; kbCtrlL = 12; kbCtrlM = 13; kbCtrl1N = 14; kbCtrlO = 15: 
begin kbCtrlP = 16; kbCtrlQ = 17; kbCtr1R = 18; kbCtrl1S = 19; kbCtriT = 20; 
rtfCurPtr := fvTopPtr; kbCtrlU = 21; kbCtr1V = 22; kbCtrlW = 23; kbCtrlX = 24; kbCtrlY = 25: 
fvCol := fvCol-1; kbCtr1Z = 26; kbEsc = 27; kbCtrlFS = 28; kbCtrlGS = 29; kbCtrlRS = 30; 
ClearWinVDC (fvX1+1,fvY1+1, fvX2-1, fvY2-1,32)- kbCtrlUS = 31; kbDel = 127; 
DispWin; 
FlipPageVDC function GetKey : byte; 
end 
end; begin 
GetKey := BDos (bdosDirectCon,bdosConIn) 
procedure ViewFile; end; 
var 
C : byte; 


THE TC-128/64 NEWS 





PROGRAM NAME: NUMSTR. INC rtfPStr = tfStr; 
rtfStr = string([rtfMaxStr]; 


SG Tools (C) 1992 Parsec, Inc. rtfPLine = tfLine; 
rtfLine = record 
The number string module converts bytes and integers to strings Line : rtfPStr; 
Prev, 
Next : rtfPLine; 
type end; 
StrByte = string[3]; var 
Strinteger = string[6]; 
rtfError, errors 
function ByteStr (B : byte) : StrByte; rtfLines : integer; line count 
rtfFirstPtr, first record pointer 
var rtfCurPtr : rtfPLine; current record pointer 
rtfFile : text; text file to read 


TempStr : StrByte; 
procedure InitReadFile (FileName : bdosPathStr) ; 


begin 
Str (B:3,Tempstr); begin 
ByteStr := TempStr rtfError := 0; initilize vars 
end; rtfLines := 0; 
rtfFirstPtr := nil; 
function IntStr (I : integer) : StrInteger; rtfCurPtr := nil; 
Assign (rtfFile, FileName); 
var SI- Reset (rtfFile); SI+ 
rtfError := IoResult 
TempStr : Strinteger; end; 
begin procedure DoneReadFile; 
Str (I:6,TempStr); 
IntStr := TempStr var 
end; 
TempPtr : rtfPLine; 
PROGRAM NAME: VDCMSGB. INC | begin 
SI- Close (rtfFile); SI+ 
SG Tools (C) 1992 Parsec, Inc. rtfError := IoResult; 
if rtfFirstPtr <> nil then dispose linked list structure 
VDC message box. No line wrapping inside window. begin 
rtfCurPtr := rtfFirstPtr; 
repeat 
const TempPtr := rtfCurPtr.Next; 
FreeMem (rtfCurPtr.Line, 
mbXSize = 40; Length (rtfCurPtr.Line)+1); 
mbYSize = 5; Dispose (rtfCurPtr) ; 
rtfCurPtr := TempPtr 
procedure MsgBox (X,Y,W,T : byte; until rtfCurPtr = nil 
Msg : fwMaxStr); end; 
end; 
begin 
DrawWinVDC (X,Y,XtmbXSize, YtmbYSize,W, ’Information’ ); procedure ReadFile; 
FWriteVDC (X+1,Y+2,T,Mse) var 
end; TempStr : rtfStr; 


TempStrPtr : rtfPStr; 


TempPtr : rtfPLine; 
PROGRAM NAME: READTF. INC 


begin 
SG Tools (C) 1992 Parsec, Inc. SI- Readln (rtfFile,TempStr); SI+ 
| rtfError := IoResult; 
The Read Text File module reads a CP/M text file into a double linked list if (rtfError = 0) and 
structure. Each text line is saved in a line record with a poitner to the (not eof (rtfFile)) then 
string. Only enough memory is allocated to hold each string, so there is . begin 
no waste! rtfLines := 1; 
New (rtfCurPtr); . sez up first record 
rtfCurPtr.Prev := nil; first records prev is nil 
const GetMem (TempStrPtr, allocate just string length + 1 
Length (TempStr)+1); 
rtfMinFree = 1024; min free memory TempStrPtr := TempStr; 
rtfMaxStr = 255; max string size rtfCurPtr.Line := TempStrPtr; 
rtfFirstPtr := rtfCurPtr; 
type 





THE TC-128/64 NEWS #34 


while (rtfError = 0) and read in rest of file 
(not eof (rtfFile)) and 
(Hi (MemAvail) > Hi (rtfMinFree)) do 
begin 
SI- Readln (rtfFile,TempStr); SI+ 
rtfError := IoResult; 
if rtfError = 0 then 
begin 
rtfLines := rtfLinestl1; add line record 
New (TempPtr); 
rtfCurPtr.Next := TempPtr; 
TempPtr.Prev := rtfCurPtr; 
GetMem (TempPtr.Line, allocate string length + 1 
Length (TempStr)+1); 
TempPtr.Line := Tempstr; 
rtfCurPtr := TempPtr 
end 
end; 
rtfCurPtr.Next := nil last record’s next is nil 
end 


end; 
function GetLine : rtf£Str; 


begin 
if rtfCurPtr <> nil then 


begin 
GetLine := rtfCurPtr.Line; get current line 
rtfCurPtr := rtfCurPtr.Next set up to read next line 
end 
end; 


PROGRAM NAME: VDCSCRL.INC 
SG Tools (C) 1982 Parsec, Inc. 


VDC window scroller using block copies and fills 


procedure ScrollUpVDC (X1, Y1, X2, Y2 : byte); 
var 


Y : byte; 
DispOfs : integer; 


begin 
for Y := Yl to Y2 do 
begin 
DispOfs := vdcSettings .DispMemtY*vdcScrHorztxX1; 
CopyMemVDC (DispOfs ,DispOfs-vdcScrHorz,X2-X1+1) 
end 


end; 
procedure ScrollDownVDC (X1, Yl, XZ, Y2 : byte); 
var 


Y : byte; 
DispOfs : integer; 


begin 
for Y := Y2 downto Y1 do 
begin 
DispOfs := vdcSettings .DispMemtY*vdcScrHorztx] ; 
CopyMemVDC (DispOfs ,DispOfstvdcScrHorz ,X2-X1+1) 
end 


end; 
procedure ClearWinVDC (X1, Yl, X2, Y2, C : byte); 


var 
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Y : byte; 
DispOfs : integer; 


begin 
for Y := Y1 to Y2 do 
begin 
DispOfs := vdcSettings .DispMemt+Y*vdcScrHorztx1; 
FillMemVDC (DispOfs ,X2-X1+1,C) 
end 


end; 


PROGRAM NAME: RTFDOS. PAS 
SG Tools (C) 1992 Parsec, Inc. 


This is a short demo for MS-DOS using READTF.INC to read and 
display 

RTFDOS.PAS in the current DOS directory. 

Compiled with TP 6.0 for MS-DOS. 


program RTF 
Test; 


At; B=, D~ 8-25, Ng Ro, 8, = 
SI READTF . INC 
procedure DisplayFile; 


begin 
repeat 
Writeln (GetLine); 
until rtfCurPtr = nil 


end; 
procedure Init (F : string); 


begin 

InitReadFile (F); 

if rtfError = 0 then 

begin 
Writeln (’Reading ’+F+’...’); 
ReadFile; 
rtfCurPtr := rtfFirstPtr 

end 

else 
Writeln (’Error reading ’+F); 


end; 
procedure Run; 


begin 
if rtfError = 0 then 
begin 
DisplayFile; 
Writeln; 
Writeln (rtfLines:6,’ lines read.’ ) 
end 


end; 
procedure Done; 


begin 
DoneReadFile 


end; 


begin 
Init (’RTIFDOS.PAS’ ); 
Run ; 
Done; 


end. 








PROGRAM NAME: QVIEW. PAS 


SG Tools (C) 1992 Parsec, Inc. 


Quick View is a VDC text file viewer. Up and down scrolls are about 20 times 


faster than CP/M BIOS! Left and Right scrolls could be improved though. 


program QuickView; 


SB- ,C-,R-,U-,V- 


SG Tools include files 


SI NUMSTR. INC 
SI BDOS.INC 
SI KEYIN.INC 
SI DIR.INC 
SI READTF . INC 
SI PORT. INC 
SI VDC.INC 
$I VDCCONST. INC 
SI VDCSCMGR. INC 
SI VDCFW. INC 
SI VDCWIN. INC 
SI VDCMSGB. INC 
SI VDCSCRL.INC 
SI DIRSEL. INC 
SI FVIEW.INC 


application specific code 


const 


appScrColor = vdcDarkGreen; 
137; 


appWallPaperChr 
var 


appMsgBoxColor, 
appWallPaperColor, 
appTextColor : byte; 


procedure DrawDeskTop; 


begin | 
ClrScrVDC (appWallPaperChr); clear screen 
ClrAttrVDC (appWallPaperColor); clear screen attributes 
FWriteVDC (0,0,appMsgBoxColor+vdcRvsVid, 


: Quick View 1.0 by SG - (C) 1992 Parsec, Inc. - All Rights Reserved 


a 


end; 


function ReadFileName : bdosPathStr; 


begin 
ReadFileName := ’’; 
MsgBox (20,9, appMsgBoxColor,appTextColor, 
*’Reading directory...’ ); 
FlipPageVDC; 
DrawDeskTop; 
MsgBox (20,2,appMsgBoxColor,appTextColor, 


*Use top cursor keys, Return and Esc’); 


FlipPageVDC; 
if dirRecs > 0 then no recs mean error or empty 
ReadFileName := SelFileName; 
DoneDirSel 
end; 


procedure BrowseFile (F : bdosPathStr) ; 


begin 

MsgBox (20,11, appMsgBoxColor, appTextColor, 
"Reading ‘tFt’...’); 

FlipPageVDC ; 

DrawDeskTop; 

InitViewFile (1,2,77,22,appMsgBoxColor,F); 
if rtfError = 0 then 

ViewFile; 
DoneViewFile 


end; 


procedure Run; 


var 


F : bdosPathStr; 


begin 
repeat view files until user esc dir select 
F := ReadFileName; 
if F <> ’’ then 
BrowseFile (F) 
until F = ’’ 


end; 


procedure Init; 


begin 
appMsgBoxColor := vdcAltChrSettvdcBlack; set app colors 
appTextColor := vdcAltChrSett+vdcWhite; 
appWallPaperColor := vdcAltChrSett+vdcLightGreen; 
InitVDC; fire up screen manager 
SetCursorVDC (0,0,vdcCurNone); turn cursor off 
FlipPageVDC; now fast writes go to 
non-viewable page 
SetScrColVDC (appScrColor,appScrColor); set app screen 
color 
DrawDeskTop; draw desk top 
FlipPageVDC 


end; 


procedure Done; 


begin 
ClrSerVDC (32); prepare screen for return to cp/m 
ClrAttrVDC (vdcAltChrSettvdcwWhite) ; 
FlipPageVDC; 
DoneVDC we are finished with the screen 
manager 


end; 


begin 
Init; 
Run; 
Done 


end. 
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DrGITAL AupIo ON Your 
Commopore 128 


By MIKE Neus 


When the Commodore 64 was introduced in 1982, it 
brought with it the most sophisticated sound 
synthesizer to date. The Sound Interface Device ‘SID} 
features three voices, four octave range. and even 
programmable wave forms and filters. A far cry from 
the primitive beeps and clicks offered from other 
computers. 


Some time ago, programmers discovered something else 
that surprised all of us. A SID chip can be used to 
recreate digital audio. Since that time, many groups 
have turned the 64 into a mini recording studio. Sound 
and graphic "demos" (sometimes called digi'’s) became 
their calling cards, leaving a trail of music and awe 
for the rest of the world. | 


Digital audio has pretty much remained in the C-64’s 
domain with noone taking advantage of the C-128's 
increased memory and speed, until now. 


With that in mind and a lot of spare time, I set out to 
make a program that will record and playback digital 
audio. After a brisk two months of development, a 
program called ZOUNDS! was released to let the 128 do 
what the 64 has done for years. 


Ok, ok, ok. Before you get too excited, remember the 
SID chip can only reproduce digital audio. So...how do 
we record it? To answer this question. we must first 
answer what digital audio is. Afterwards, you can 
build the simple circuit in this article to record and 
play back your own sounds. 


As the name implies, digital audio is nothing more than 
a series of digital numbers. This is the basis of how 
computers work. You may have also heard the term 
"analog" to describe our world. Sound is an example of 
an analog signal. At any given moment in time. it has 
a measurable amplitude. Graphs can be made that 
approximate the appearance of sound as it travels 
through the air (Figure 1). 


mplitude 


A 





Time --> 


Figure 1: Graphical representation of a sound wave in 
air. 


If we are to record the sound on a record or cassette 
tape, the imprinted signal closely matches the 
graphical interpretation in Figure 1. We can also 
record the signal by assigning numeric values 
representing amplitude at a given time. If this is 
done quickly and repetitively, the numbers begin to 
approximate the analog signal (Figure 2) 
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Figure 2: Approximation of Figure 1 by using numbers. 
Since a number is readily converted into binary form, 
an approximation of the signal can be stored in digital 
memory. Converting an analog signal into digital 
format is called digital sampling. 


Figure 2 illustrates two important principles. Note 
the first half of the figure has less samples (lines) 
than the second. Also note the more lines we have, the 
more accurately the signal is approximated, 
particularly where the curve is steep. Therefor, 
increasing the sample rate will give a better 7 
recording. Also note that to sample faster, you will 
need a faster computer and additional memory to hold 
more samples. 


Another important principle is resolution. This is 
best explained using Figure 3. 


Value 





Figure 3: The affect of resolution in sampling 


The first third of the graph assumes infinite 
resolution. Notice the graph closely matches the... 
analog signal in the last third of the graph. - Now. 
suppose the resolution is dropped to five numbers above 
or below the middle line. When the signal is sampled. 
the nearest value must be used, resulting in a stair 
step pattern. 


The effects of resolution and sampling rate are well 
defined. One rule is the sample rate must be at least 
twice the highest frequency you wish to record. In the 
case of compact disc, a sample rate of 44.1KHz was used 
to ensure the highest audible frequency of 20KHz could 
be recorded. 


The above process may sound a bit complicated. but 
fortunately a number of integrated circuits are 
available to sample analog signals into a computer. An 
Analog to Digital Converter (ADC) is designed to 
provide an interface for the computer into the analog 
world. Voltages in an audio signal are thus easy to 
convert into digital information. 


To convert the digital pattern back into an audible 
analog waveform, a Digital to Analog Converter (DAC) is 
required. A DAC is needed convert a digital number 
back into an analog voltage. This is the exact 
opposite function of an ADC. In the case of the 
ZOUNDS! project, we will use the SID as a DAC. 


Technically, the SID has no DAC. However, it does have 
something that can be adapted. The volume control 

register at 54296 ($D418) "features" turn on transients 
which can be heard as a pop when the volume is changed. 





The greater the change, the louder the pop. This 
closely approximates what a DAC does. Because the 
volume register is 4 bits (0 through 15), we are 
limited to four bits of resolution. With these 
principles and limitations in mind, we are now ready to 
design the ADC circuit. 


For the ZOUNDS! project, I chose to use a Harris 
CA3306. This particular circuit is plug compatible 
with the RCA CA3306 and Micro Power Systems MP/682. 

The Harris version is available in a number of 
suffixes. Each version varies slightly in performance. 
The cheapest version (about $10) is adequate. 


Most any converter will work for this project, but the 
driving factors for using this particular ADC were its 
low parts requirement and quick speed. The CA3306 is a 
six bit converter so the two least significant bits 
will be ignored. Experimenters may wish to try the 
CA3304, a slightly cheaper four bit version. 


There is one more problem that must be addressed. A 
glance at Figures 1-3 shows sound waves consist of 
positive and negative voltages. Unfortunately. the ADC 
will only have access to ground and +5 volts. This 
means the converter is restricted to converting only 
between O and 5 volts. 


What is needed is a way to shift the input signal to 
center around 2.5 volts instead of ground. 

Fortunately, there is a simple and inexpensive 
solution. The LM386 amplifier features an output stage 
that adjusts the output signal to be centered around 
1/2 the supply voltage (ie: 2.5 volts with a five volt 
supply). With this condition imposed, the ADC will now 
easily convert both positive and negative voltage 
swings. 


The ADC will interface directly to the C128 expansion 
bus. At this time, I must point out that you must 
proceed carefully. Any miswiring can result in 
permanent damage. Neusoft Software Systems, the author 
(Mike Neus), Parsec Inc., or Twin Cities 128 Magazine 
shall not be responsibie or liable for any damage. 


You will need the following parts to build the audio 
sampler: 


1) Harris or RCA CA3306 -or- Micro Power MP/682 flash 
ADC 

2) LM386 low power audio amplifier 

3) O.luF ceramic capacitor 

4) luF electrolytic capacitor rated for 10 volts or 
more 

5) lOOK potentiometer 

6) RCA jack 

7) A Commodore compatible prototype board 

8) Wire, solder, sockets etc to suit your building 
habits 


(This is the “original” circuit, the following (2nd) 
circuit is a newer version that Mike gave to us 
shortly before press time so we are including both! ) 






RCA O.luF 


CA3306 or MP7682 i Expansion 
ADC Port 


Olu | GN a ie nea TRIES | = 
z : a  , = 
RCA sow Bee 
: z wane Mote ee | 
100K : O4uF pigeie 4 a ae re ‘a 
ik lous | CU, 
LM386 Amp L149 VREF- VREF+ 3 }— luf = : 
= —122,AR,c GND 
CA3306 or MP?682 i Expansion 
ADC Port 


Figure 4: Schematic of the ZOUNDS! sound sampler. 
Use this newer one as it is suppose to produce cleaner 
sound samples. 


The ADC is visible to the 128 as a memory device using 

the I/O 1 control line on the expansion port. When the 
ADC is connected to 1/0 1 and the 8502 data bus, it is 

accessible by reading location 56832 (SDEOO). 


This sampler is compatible with the ZOUNDS! software 
available through the public domain. If you do not 
have ZOUNDS!, I have included a scaled down version of 
ZOUNDS! (called TCZOUNDS!) to help vou get started. 
TCZOUNDS! includes capture and playback routines, plus 
a sound monitor routine. The following information is 
intended mainly for TCZOUNDS! users. ZOUNDS! users 
should refer to the documentation included with the 
program for information and instructions. 


All routines use the CIA hardware timers to generate 
the sample clock. This allows compatibility with both 
2MHz and 1MHz modes. It also means the VIC screen does 
not have to be blanked if you are using 40 columns. | 
The routines also take over the non maskable interrupt 
(NMI) routine for their own use. It assumes that any 
NMIs come from the RESTORE key, so be sure to turn off 
your modem or other attachments that use an NMI. 


TCZOUNDS! limits the sample to RAM bank 0 at SOAFD 
through SCFFF. Memory locations SOAFD - SOAFF, hold 
registers special to TCZOUNDS! files. Two registers 
are taken care of automatically: Ending RAM bank 
(SOAFE) and ending page (SOAFF). The ending page 
points to the last page of memory that holds data. The 
ending RAM bank indicates which bank the ending page is 
in. Normally, the ending RAM bank is O for bank O or 
non zero for bank 1. In TCZOUNDS!, the ending RAM bank 
register will be automatically set to zero. 


The third parameter, sample speed (SOAFD) will require 
manual entry with the machine language monitor. Valid 
numbers are 15 - 255 (SOF - $FF) at 2MHz CPU speed. At 
1MHz, the lower limit will be 30 (S1E). To determine 
the sample rate, the formula is 1x106/(register value). 
The quickest sample speed is determined by software 
overhead. Smaller values will not result in faster 
sample speeds. The fastest speed is 66./7KHz, about 66% 
faster than the sampling speed of compact disc! 


As a default, try 100 ($64). or 1OKHz. 100 offers an 
excellent trade off between memory usage (you will have 
about 10 seconds worth), and sound quality A nigh 
sample rate will give better sound quality (refer to 
Figure 1), but as can be expected, the maximum sample 
length will decrease. 


The sample will be stored sequentially starting at 
SOBOO. Since the resolution is fixed at four bits, two 
samples are stored in each byte. The first sample is 
stored in the upper nibble, while the second is placed 
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in the lower. Sampling will stop when you halt it or 
if memory limits are exceeded. 


This exact same format is used bv ZOUNDS!. This means 
files you make with TCZOUNDS! will be compatible with 
ZOUNDS! should you chose to upgrade. Likewise, ZOUNDS! 
files will be compatible with TCZOUNDS!. Unlike 
TCZOUNDS! , ZOUNDS! will have access to both RAM banks, 
and will automatically set each register. 


To use TCZOUNDS!, entry into the C128 machine language 
monitor is required. Because TCZOUNDS! uses BASIC 
storage space, care should be taken to avoid the BASIC 
interpreter after a sound is recorded or loaded. For 
this reason, use the monitor’s J command instead of G. 
J will alwavs return to the monitor but G will 
(usually) return to BASIC. To end a TCZOUNDS! 
session, reset the computer to insure BASIC will 
function properly. 


Use the monitor (not to be confused with the C128s ML 
monitor) routine (J OEOOO or ‘'M’ from ZOUNDS! menu) to 
verify the ZOUNDS! interface is functional. Plug in 
the sampler and an audio source--line level signals 
from a stereo component work well. Adjust the 
potentiometer while you are listening to the sound you 
intend to sample. If the sound is distorted, turn the 
potentiometer to decrease the volume. Ideally, the 
volume should be as high as possible before distortion 
is audible. Press the restore key to leave the 
monitor. 


The distortion is generated when the voltage entering 
the ADC wants to exceed the supply voltages of QO and 5 
volts. The signal is clipped, looking something like a 
square wave. It won't damage anything, but it should 
be avoided. 


You may have noticed that in order to hear the sound on 
your monitor, you had to turn the volume way up. If 
you did, you have an "improved" SID chip. It seems 
Commodore figured out how to reduce the SIDs transient 
characteristics, reducing its effectiveness as a DAC. 

A soft SID chip is normal and does not indicate a 
problem. If you feel uncomfortable turning your 
monitor up all the way, the included BASIC program 
"LOUD" will make the SID louder. Run this program 
before entering ZOUNDS! or TCZOUNDS!. 


When the sampler is set up, you can record your sound 
(J OEO17 or ‘'R' from ZOUNDS! menu). Sampling will 
begin as soon as the routine is entered and will end 
when you press the restore key or memory runs out. If 
you care to save your sound to disk, use the machine 
language monitor to examine memory location $QAFF 
(ending page number). Add two zeros to the end of this 
number to get the ending address. then save file: 


S "0/filename" ,device,OAFD,address 


The O/ prefix indicates it is a ZOUNDS! file compatible 
with any ZOUNDS! player. 


Use the playback routine to hear what you have recorded 
(J OEO4E or 'P’ from ZOUNDS! menu). For an interesting 
effect, try adjusting the speed register ($03FD) before 
playback. A smaller number will speed the sound up. 
Larger values will slow the sound down. | 


To load a pre-recorded sound for playback, use the 
monitor load command: 


L "0/filename" ,device 
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This is a small smattering of what can be done with 
digital audio. With the sound now stored in a computer 
memory, the possibility for digital signal processing 
on the 12@ is now a reality. Echoes are one 
possibility I’ve heard on a 64. Try flipping the sound 
backwards for fun. Try editing patches together for 
your own custom song. 


ZOUNDS! will not do all this, but it is an important 
step towards it. If you would like a complete copy of 
the ZOUNDS! software, it is available through GEnie, 
Parsec Inc., or local BBSs. It is also available by 
sending three blank 5 1/4" disks and $5.00 to: 


Neusoft Software Systems 
Attn: Mike Neus 

396 S.W. Parkway #2725 
Lewisville, TX 7506/7 


PROGRAM NAME = KICK 

10 *= SE000 

20 .d kick tczounds.bin 
30 .f tczounds.srce 


PROGRAM NAME = TCZOUNDS .SRC 


dk 1000 ; filename = tczounds.src 


ha 1010 3 Fe Fe He Fe We He He He He He Ve He He Me He He He He He Fe He Ke He HK HH eK HK He 


ke 1020 ;* tczounds!--special twin * 
lo 1030 ;* cities zounds! version. ¥ 
ac 1040 ;* copyright 1992, neusoft * 


md 1050 ;* software/parsec inc. refer * 
po 1060 ;* to "Digital Audio For Your * 
ie 1070 ;* commodore 128" for * 
ii 1080 ;* instructions. * 


mb 1090 3 WHe He He He He He ve He He He He He He He He He He He Fe He He He Ke He He He He He He Ke 


il 1100 ; 


nf 1110 5 Fe ve ve He He ve He He He He He He He He Fe He He Fe He Fe Ye He He He He He He He He HK He 


af 1120 ;* define labels ¥ 
Oj 1130 g Fe He He ve Fe Fe He He Fe He He He He He He He He He He He Ve He He He He He He He KK He I 
ld 1140 ; 

id 1150 colum = See; 
jm 1160 istore = Sfb; 
eb 1170 restor = Sfe; 


columns on current display 
temporary storage/vector 


flag for restore key 


ne 1180 inmi = $0318; nmi indirect vector 

ij 1190 cnmi = S$0a70; location to copy nmi routine 

ch 1200 strbot = S0b00; bottom of sound storage 

lg 1210 strtop = S$d000; top of sound storage 

pk 1220 scroly = $d011; vic ii y smooth scroll & control register 
nj 1230 clkrte = $d030; cpu clock rate control register 

ki 1240 sigvol = Sd418; sid volume register 

bo 1250 mmurcr = $d506; mmu ram configuration register 


eo 1260 ditll = Sdc04; 
aj 1270 ditih = SdcO5; 
el 1280 dlicr = SdcOd; 
ag 1290 dicra = SdcOe; 
mk 1300 convrt = Sde00; 
pe 1310 mmucr2 = Sff00; 
gi 1320 ; 


le 1330 ee eS ee eee eer eee 


cia#l timer register, lo byte 
cia#l timer register, hi byte 
cia#l interrupt control register 
cia#l control register a 

memory location of adc 


mmu configuration register 


bo 1340 ;* define variables % 
mg, 1350 s He Fe Fe He He He He He He He He He He He He He We He He He He He He eH He He He He He HK 
ja 1360 ; 

cg 1370 ram0d 

in 1380 onek 

il 1390 start 
ok 1400 stop 


ab 1410 clricr = 200011111; clear cia interrupt sources 


Hi 


400111110; mmu configuration for bank 0 & i/o 


i 


400000100; mmu configuration for 1k common ram 
200000001; cia timer start code 
400000000; cia timer stop code 


H 








tt 


fl 1420 fast 
eg 1430 blank 
oa 1440 ; nl 2170 ploop1 ldx dlicr; wait for timer underflow 


ck 1450 + HIME H RIK HH WIT WKH HI HH HW HH HH EK 


200000001; fast cpu enable fg 2150 lsr 


400001011; blank vic screen ga 2160 lsr 


en 2180 beq ploopl 


kd 1460 ;* start of monitor routine. al em 2190 sta sigvol; play sample 

po 1470 ;* enter this routine after the * ni 2200 lda (istore),y; get sample 

nk 1480 ;* speed register (SOQafd) has * af 2210 and #S0f; isolate second sample 

mf 1490 ;* been set with a legitimate * jg 2220 ploop2 ldx dlicr; wait for timer to underflow 
di 1500 ;* value. . if 2230 beq ploop2 

4:4 1510 SNE TE NCIC Fe Tee ITEM EH Fe TEA Pee HE PONE UR Fe PPE Ze : ho 2240 sta sigvol; play sample 

da 1520 ; ej 2250 iny; increment counter 

op 1530 *= Sev0l mc 2260 bne playit; play it again, sid!!! 

ef 1540 ; hj 2270 inc istoretl 

jb 1550 monitr jsr setup: set up ram, nmi cia, and vic af 2280 endpla lda #Sff: get ending memory location 
og 1560 mloop ldx dlicr: read timer status jo 2290 cmp istoretl; end of memoryprintprintprint 
di 1570 beq mloop; wait for timer tc underflow pe 2300 bne playit; no-- play next page 

il 1580 lda convrt; get adc reading nl 2310 jmp reset; yes--reset config, exit 

ae 1590 and #5S0f; screen upper nibble fe 2320 : 

gf 1600 sta sigvol; play it JO 2330 Jen Rn Redman IOI IC Ic 

cp 1610 ldx restor; was restore key pressedprint 1j 2340 ;* setup routine. initializes * 

af 1620 beg mloop; no--~-get next sample hf 2350 :* mmu, nmi, cia, and vic. ve 

fg 1630 jmp reset; yes--restore computer config, exit Lim 2360 ¢ ve te de deve se deve de deve ve ve ae ve He ve ve Ie He HET eH HITE HH He I 

kj 1640 ; : ig 2370 ; 

PATO 50> gE en Rr marae nova reagan em nen tees do 2380 setup sei; disable irq 

fk 1660 ;* start of record routine. “ fn 2390 pla; pull return address from stack 
mh 1670 :* enter this routine after the * ka 2400 sta cnmi-2 

kd 1680 ;* speed register (SQafd) has * bo 2410 pla 

io 1690 ;* been set with a legitimate * kl 2420 sta cnmi-1 

jf 1700 ;* value. the last page of * mc 2430 :; 

jo 1710 ;* ram the sample occupies will * on 2440 ida mmucr2; get current memory bank 

oa 1720 ;* be stored at SOaff. % oa 2450 pha; store it 

ed 1730 SEINE Te FO RM ACNE ACIS He Ye Ve Fe He BE IDE HE Me ot Te FE MePe E e He bg 2460 lda #ram0; set for ram(0) and i/o 

an 1740 ; eh 2470 sta mmucr2 

ba 1750 record jsr setup; set up ram, nmi. cia and vic np 2480 lda mmurcr; get current ram configuration 

eb 1760 rloopl ldx dlicr; wait for timer underflow di 2490 pha; save it 

1j 1770 beq rloopl ha 2500 lda #onek 

eh 1780 lda convrt; get reading from adc ia 2510 sta mmurcr 

ob 1790 asl; move digitized data bm 2520 ; 

pe 1800 asl; to upper nibble of pi 2530 lda column; 80 columns displayedprint 

ol 1810 asl; accumulator... ce 2540 cmp #S4f 

oo 1820 asl ba 2550 bne nofast; no---don’t set fast mode 

be 1830 sta ormetl; stash it for later om 2560 lda #fast; yes--set fast mode 

ic 1840 ldx restor gh 2570 sta clkrte 


me 1850 bne endrec; continue if restore not pressed cn 2580 lda #blank 


og 1860 rloop2 ldx dlicr; wait for next underflow bh 2590 sta scroly 


ce 1870 beq rloop2 gn 2600 ; 
km 1880 lda convrt; get reading from adc ba 2610 nofast ldy #S0d; initialize counter 
cn 1890 and #S0f; mask upper nibble ab 2620 cpynmi lda nmi,y 
fn 1900 orme ora #Sff; or result with first reading hg 2630 sta cnmi,y; copy nmi routine to unused ram 
io 1910 sta (istore),y; store data in memory in 2640 dey; decrement counter 
po 1920 iny; increment counter | en 2650 bpl cpynmi; copy next byte 
fc 1930 bne rloopl; get next byte if counter not ’flipred’ bc 2660 lda inmi; save nmi vector 
ng 1940 inc istoretl1; modify vector bl 2670 pha 
op 1950 lda #>strtop jj 2680 lda inmitl 
gn 1960 cmp istoretl; reached top of memoryprint cp 2690 pha 
ip 1970 bne rloopl; no-- fill next page jl 2700 ldx #<cnmi; reset to custom routine 
ek 1980 endrec lda istoretl cn 2710 ldy #>cnmi 
co 1990 sta strbot-1; store last page filled oc 2720 stx inmi; store new vector 
pn 2000 jmp reset; restore computer config and exit dk 2730 sty inmitl 
fm 2010 g Fe Fe Fe We Fe He He He Ve He He He He He He He He He He He Fe He He He Fe He He He He He He en 2740 ldy #S00 
eg 2020 ;* this is the play routine. a hk 2750 sty restor; clear restore flag/counter 
ih 2030 ;* no settings are required = an 2760 ; 
fm 2040 ;* since it will use the info * pj 2770 sty istore; set up storage vector 
ph 2050 ;* stored during the record ¥ fa 2780 lda #>strbot 
jc 2060 ;* process. jd 2790 sta istoretl . 
932070: PORES EAE RS CRE Nee Ae RS pe 2800 sty strbot-2; clear ram bank register 
gd 2080 ; dp 2810 ; 
ek 2090 play jsr setup; set up ram, nmi, cia and vic fj 2820 lda #clricr 
le 2100 lda strbot-1 dh 2830 sta dlicr: clear all interrupt sources in cia#l 
id 2110 sta endplati; store ending page for later bg 2840 lda #stop 
cj 2120 playit lda (istore),y; get sample aa 2850 sta dicra; stop timer 
; ec 2130 lsr 
he 2140 lsr; isolate first sample 
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db 2860 lda strbot-3; get sample speed W 1 
bl 2870 sta ditil; set timer lsb C- 128 e RA PLAYERS 


fp 2880 sty ditih; set timer msb 
fk 2890 1da #start BY SHANE BURTON 
do 2900 sta dicra; start timer 
ke 2910 ; 
kd 2920 lda cnmi-1; push return address back Editor’s note: Because we have already run two articles 
ca 2930 pha : in issue #34, one for the C-64 and one for the C-128, 
jh 2940 Lda cnmi-2 explaining how analog sound is recreated in digital 
de 2950 pha form on computers, I have elected not to run a full 
io 2960 rts article with the following program listings. 
Ca 2970; rH sess se ses sess seas se esse ve ee eae ae He se fe i ie 9c 
cp 2980 ;* this routine restores the ~* The functions of the programs are fairlv easv to 
jf 2990 ;* computer to normal operation * understand and most assemblv ianguage programmers can 
cl 3000 ;* before leaving tczounds! easily modify the source code to work within various 
Qi BOLO 5 ee i Hea ade aeae dese ae se ae ae eee etree ede deeded desea applications and with various assemblers. 
be 3020 ; 
pf 3030 reset Ilda #stop The machine language modules (rawxxx.bin) can easily be 
nl 3040 sta dicra; stop cia timer merged into any Basic /.0 program for playing digital 
pe 3050 pla; restore nmi vector sound within programs or games. There are hundreds, 
dn 3060 sta inmi+l maybe thousands, of ".raw" digital format sound files 
le 3070 pla available on bulletin board services and public domain 
ej 3080 sta inmi . disks. 
an 3090 pla; restore mmu configuration 
nb 3100 sta mmurcr You can adapt these source code files to play other 
nn 3110 pla digital sound formats too! Often the only difference 
ne 3120 sta mmucr2 between the various digital sound format files is the 
id 3130 cli: enable system irq header for that particular machine or program. By 
ia 3140 rts: exit program using the BLOAD command or a sector editor this is a 
jf 3150 ; fairly easy task to accomplish. 
MP BLO, re tere revere weve eve ve de de ve ve ve eve ve He Fe ve ve He He Fe ve He Te He He 
ip 3170 :* this section is copied into * A good example might be that to create "DigiTalker 128" 
ig 3180 ;* common ram at cnmi. it = files all you have to do is prepend the DT128 file 
pi 3190 ;* is used when the restore key * | headers to the beginner of the ".raw" file data. Or 
kk 3200 ;* is pressed. * you can prepend the ."raw" file header to the DT128 
bb 32.10 RRR RSC ASAI I III ICICI IIIT III file data to create ".raw" files. The only thing you 
ni 3220 - have to watch out for is setting the speed bvte 
10 3230 nmi ida #Sff correctly in the created files. The original source 
he 3240 sta restor; set restore flag code was developed for/from Atari ST sound files and 
po 3250 pla; get ram configuration register . source code from GEnie! The "vietnam.raw" file was 
of 3260 sta mmucr2; restore memory | converted from an Atari ST sound file. 
hn 3270 pla : 
md 3280 tay; pull vy 
jb 3290 pla PROGRAM NAME :RAWSYS128.BAS 
mk 3300 tax; pull .x 
11 3310 pla; pull .a , he 200... Sei: SSS SaaS H Sas Se SS re a ee Se eee ee sere 
ik 3320 rti; end interrupt | kh 110 rem filename = rawsys128.bas 
dn 3330 .end no 120 rem rawplayer 128 v1.0 is commercial software from 

ag 13C rem twin cities 128/64 issue #34 bv: 

mo 140 rem parsec inc po box 111 salem ma UJ19/70-0111 usa 
Quick start instructions: . le 150 rem copyright 1992 - all rights reserved 

| ik. 160 sem: eyes eens a Soares See re ee See ea 

run" tczounds~- ioud” . lp 170 rem plays sample from system bank l 
moN (monitor command) | pm 180 fast 
L"tczounds.bin", 8 no 190 bload"rawsys128.bin",b0,p2816:bload"vietnam.raw’ ,b1,p1024 
L"0/energize’ ,8 mc 200 a=peek(175):a=a-3:poke2879,a:poke2882 ,4:poke2884 , 22: poke28&3,1 
J OEO4E . eo 210 sys2816 


PROGRAM NAME: RAWSYS128 . SRC 


Ce. 1000.2 Seats SSS nee ee ee Se Sea Sa ee aS ea Se ee Se 
fl 1010 ; filename = rawsys128.srce 

nm 1020 : rawplayer 128 v1.0 is commercial software from 
jm 1030 ; twin cities 128/64 issue #34 by: 

ah 1040 ; parsec inc po box 111 salem ma 01970-0111 usa 
ki 1050 ; copyright 1992 - all rights reserved 

BO. 1060: = Se sesSocs SS Sees as sees eet e oS Sa eS Se See 
gn 1070 ; 

ba 1080 sidvol = $d418 

fn 1090 indfet = Sff74 


il 1100 ; 
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fa 1110 *= SOb00 PROGRAM NAME :RAWREU128 . SRC 
jp 1120 ; 
eb 1130 sei; disable all maskable interrupts Ce 1000 sea See See Sr a ee a ee er ee eae 
kp 1140 ldy offset: offset for indirect y add for indfet kernal fe 1010 ; filename = rawreul28.src 
routine nm 1020 ; rawplayer 128 v1.0 is commercial software from 
mn 1150 lda startlsb; startlsb holds the lsb of the samples location jm 1030 ; twin cities 128/64 issue #34 by: 
ib 1160 sta Sfa: store lsb in zero page ah 1040 ; parsec inc po box 111 salem ma 01970-0111 usa 
bj 1170 Lda startmsb; startmsb holds the msb of the samples location ki 1050 : copyright 1992 - all rights reserved 
kh 1180 sta Sfb; store msb in zero page BD LOGO: So Sa arse er ee eae Sa ee maine Sea ee 
pg 1190 start lda #§fa; Sfa is where to find the pointer tc ycur address gn 1070 ; 
je 1200 ldx bank; bank holds the bank# from which to read data (0/1) he 1080 dmalo = Sdf04 
on 1210 jsr indfet; call indfet kernal routine located at Sff74 fj 1090 dmahi = Sdf05 
ad 1220 ; jh 1100 dmaadl = Sdf02 
cf 1230 clc; clear the carry flag jf 1110 dmaadh = Sdf03 
fj 1240 lsr; manipulate the byte in the accumulator al 1120 dmabnk = Sdf06 
mo 1250 lsr oo 1130 dmadal = Sdf07 
ni 1260 lsr om 1140 dmadah = Sdf08 
oc 1270 lsr fg 1150 sidvol = $d418 
gn 1280 sta sidvol; store the acc. in the sid volume register ($d418) mh 1160 ; 
ff 1290 iny; increment y register im 1170 *= S0b00 
ik 1300 sty offset; put increased y value in offset to be read again nl 1180 ; 
fo 1310 ; hn 1190 sei; disable all maskable interrupts 
ej 1320 cpy #5ff; is y 255print gm 1200 lda startlsb; Startlsb holds the lsb of the sample location in 
pe 1330 bne speed; if not then go to the speed routine before before reu 
ei 1340 : fetching the next byte pn 1210 sta Sfa; store leb in zero page 
cm 1350 ldy #S00; reset y register to zero li 1220 lda startmsb; startmsb holds the msb of the sample location in 
ng 1360 sty offset; put a zero in offset reu 
fh 1370 inc Sfb; increase the msb. we have already reac 255 bytes nj 1230 sta Sfb; store msb in zero page 
hd 1380 lda Sfb; what is our msb now bh 1240 
cg 1390 cmp endmsb; is the current value of Sfb the last ryte we wish ni 1250 start lda Sfa; Sfa contains the lsb of reu address we want 2 read 
jf 1400 ; to read on 1260 sta dmalo; store the value that we found in Sfa at Sdf04 
eh 1410 bne speed; if not then go to the speed routine before gk 1270 lda Sfb; Sfb contains the msb of reu address we want 2 read 
fetching ad 1280 sta dmahi; store the value that we found in Sfb at Sdf05 
pe 1420 the next byte ek 1290 ; 
fb 1430 cli lo 1300 lda #S8fc; lsb of internal ram address we are gcing to write 
ji 1440 rts to , 
ok 1450 io 1310 sta dmaadl; store #Sfc at Sdf0zZ 
ok 1460 speed ldx begval: beginning value in countdown ne 1320 lda #S00; msb of internal ram address we are gcing to write 
df 1470 decrease dex; decrease begval by one Lo 
lg 1480 bne decrease; are we down to zero yetprint ml 1330 sta dmaadh; store #500 at Sdf03 
af 1490 jmp start; let us do it ail again for the next tyte hm 1340 
bm i500 ; gb 1350 lda reubank; reubank contains reu bank# we want tc address(U-7) 
km 1510 endmsb .byte S00 gl 1360 sta dmabnk; store reubank at Sdf08 
hi 1520 offset .byte S00 jk 1370 
np 1530 startlsb .byte S00; initialize all addresses with zero ma 1380 ida #S01;: lsb of # of bytes we want to read 
bf 1540 startmsb .byte S00 jo 1390 sta dmadal; store #501 at Sdf07 
pa 1550 bank .byte S00 ng 1400 lda #500; msb of # of bytes we want to read 
hj 1560 begval .byte S00 jf 1410 sta dmadah; store #8500 at Sdf08 
fg 1570 .end mm 1420 ; 
gf 1430 ldx #500; c128 bank we are going to write the tetched byte 
to 
PROGRAM NAME :RAWREU128. BAS ac 1440 ldy #881; #S81 indicates we are going to fetch data from reu 
mb 1450 4sr SEESO; jump to dmacall kernal routine and fetch the data 
NO? LOU: em See ea ars er ea SS eS eS SS Sea ees pe 1460 ; 
in 110 rem filename = rawreul28.bas ih 1470 lda Sfc: load the fetched byte into the accumulator 
no 120 rem rawplayer 128 v1.0 is commercial software from ca 1480 clc; clear the carry flag 
ag 130 rem twin cities 128/64 issue #34 by: fe 1490 lsr; manipulate the byte in the accumulatcr 
mo 140 rem parsec inc po box 111 salem ma 01970-0111 usa mj 1500 lsr 
le 150 rem copyright 1992 - all rights reserved nd 1510 lsr 
5B se 09 a aaa cl a ee a nn 1520 lsr 
jg 170 rem plays sample from reu bank 0 kb 1530 sta sidvol; store the accumulator in the sid vol reg (Sd418) 
po 180 slow ef 1540 
pk 190 poke 53265, 32 mo 1550 inc Sfa; add 1 to the value in Sfa so we can read the 
ih 200 bload”rawreul28.bin" ,p2816:bload’ gameover.raw’ ,b1,p1024 mj 1560 ; next byte 
co 210 a=peek(175):a=a-4:poke2910,a:poke2911,1 jh 1570 ldy Sfa; load Sfa inte the y register 
ao 220 bankl:stash (a*256),1024,0,0 fh 1580 cpy #Sff; is y 255 
bi 230 bank15:sys2816 pm 1590 bne speed; if not then go to the speed routine Lefore 
fetching 
kh 1600 ; the next byte 


ke 1610 ldy #S00; 
fo. .1620 ine ‘SEE- 


put a zero in the y register 


increase the msb. we have already reed 255 bytes 
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go 1630 lda Sfb: what is our msb now 


km 1640 cmp endmsb; is the current value of Sfb the Last Lyte we (IN THE NEWS - continued from page 4! 
hj 1650 ; . wish to read 
ec 1660 bne speed; if not then go to the speed routine before Best Computer Supplies 
| fetching 4980 Longley Lane Ste 104 
on 1670 ; the next byte Reno NV 89502 
en ee 1-800-544-3472 Voice 
jd 1690 rts 1-702-826-4376 
of 1700 1-702-826-4392 FAX 
of 1710 speed ldx begval; beginning value in countdown 
da 1720 decrease dex; decrease begval by one 
lb 1730 bne decrease; are we down to zerce yetprint A SCARY THING ? 
aa 1740 jmp start; let us do it all again for the next byte From Mark Dulski: I am currently reading "Needful 
bh 1750 - | Things" by Stephen King. The story takes place in 1991 
kh 1760 endmsb .byte $00 and guess what one of the main characters just bought 
el 1770 begval .byte $00 his son? A new Commodore 64! That’s the first time 


I’ve seen Commodore mentioned in a work of fiction. 


he 1780 startlsb .byte S00: initialize all bytes to zero 
The 64’s are still known. 


ap 1790 startmsb .byte $00 
hi 1800 reubank .byte S00 nk 


eh 1810 .end 
NEW GENIE SIGNUP NUMBER 


There is a new GEnie signup number and password for the 
Commodore 64/128 Roundtable. It is xtx99018,commrt 
Make sure you use it! 


RIO COMPUTERS 
Rio Computers is having a summer time special on the 


Video Digitizer we reviewed in this issue, 
only $149.95! 


: Leroy's Cheatsheets ® — Commodore 64 & 128 





We've helped hundreds of thousands to use their Commodore since 1982 
PROGRAM DOCUMENTATION — Manuals lost, hard to use? 


You need Leroy's Cheatsheets — All the program command keystrokes available at a glance. Reference card fits on the keyboard and surrounds the 
keys with valuable information. All commands are grouped according to function, actual keystrokes are shown in bold type, while any variables are 
represented in italics. Leroy's Cheatsheets are offset printed for clarity and plastic laminated for years of use. 













only $5 ea Commodore 64 only *3° ea or 3 for $9% 
Cmmodore 128 y 
or 2 for *9%° Basic 2.0 Easy Calc Geos 2.0 Paper Clip Ill Sky Travel 
Beginner Easy Script Gemini 10X, 15X Pocket Filer Speedscript 
Beginner Newsroom Superbase Blanks (3 ea) Elite Logo (sheet 1) Pocket Planner Sprites Only 
Blanks (3 ea) Paper Clip II SuperScript Calc Result Adv. Epson FX 80 Logo (sheet 2) Pocket Writer SuperBase 64 
Easy Script Pocket Filer SwiftCalc Consultant Fleet Filer Manager (CBM) = PraciCalc 2 Superscript 64 
Elite : Pocket Planner Wordpro Data Manager2 Fleet System 2+ © Newsroom Printer 1526 SwiftCalc 
Flight Simulator Il Pocket Writer Word Writer Disk 1541 Flight Simulator Il Okidata92-93 Printers801,803 1525 Vizastar . 
Multiplan Doodle Geos Paper Clip Simon's Basic Word Writer 4/5/6 















Name 
Street 


Keystone Software 















New!! Easy to use productivity software. Our job specific software is designed 
to get one task done quickly and easily. Nine new programs featuring drop. down 
menus and entry windows, Each specifically designed for your activity with 
Categories already laid out for you. All programs include both 64 & 128 (40 & 80 


col.) versions on same disk. 
only *79°° ea or 2 for §299° 


“DESCRIPTION = = ee 



























@ Audio Cassette Library @ Mail List Manager 

@ Baseball Card Collection @ Photo/Slide Library 

@ CD/Library @ Stamp Coin Collection 

@ Home Book Library @ Video Cassette Library Shipping & Handling 





@ Home Inventory 






PA. Residents add 6% TAX 






Label! Maker - When a list or sorting is not required and you just need to make labels 
quickly and easily, this is the program you need. Now in machine language -runs 50 

times faster than our original! Use your printer's font and color capabilities. New label 
designs that you create can be used with all of the above programs. You can mix text 


d list data together. Prints label to 64 characters wide by 15 li by 12 : . 
Cael Maker wilaico stint a Ronen Esiate tor nunberng paur bale aiaaia CPI, aero ioe one ht aise ; A 15218 
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A PROFILE OF A 
COMMODORE USER: 
EDITOR'S PROLOGUE 


BY JOHN W. BROWN 


I first inquired about Mr. Lauder’s involvement with 
the Leonard Wood Memorial Foundation when I noticed his 
letterhead and wondered if he was using his C-128 to 
help run such a big business. Subsequently he sent me 
just about everything you could want or need to know 
about the L.W.M., himself, and his work. His 
professional credits are quite impressive and and take 
two pages by themselves so I will not list them all 
here. I would like to add though looking at his 
biographical summary you know he is someone special, 
more so for the work he currently does. 


People often wonder about using their Commodore 
computers for "serious" business use. You can not get 
more serious than this and the budget he helps handle 
on his C-128 approaches seven figures, that is serious! 


Excerpted from their annual report: 

"Most people think leprosy was a scourge of past 
centuries and no longer exists. Unfortunatelv, this 
is not true. Leprosy is still very much with us today. 
There are 6,000 KNOWN (1990) leprosy cases in the 
United States. Worldwide, there are an estimated 10-12 
million people with the disease. Leprosy is a far more 
serious problem than sheer numbers, because it involves 
disabilities, economic loss, and emotional trauma for 
those involved." 


"Leprosy is caused by a bacterium. There are two types 
of the disease, one relatively mild and 
non-progressive, the other severe, progressive and 
disfiguring. We do not know what determines which form 
a person acquires. The majority of people are either 
immune or for some reason non-susceptible to the 
infection." 


"The American Leprosy Foundation subsists by donations 
from the general public, bequests, special gifts. 
Combined Federal Campaign, national and international 
research grants, and gifts from private citizens. We 
are a Combined Federal Campaign #0306." 


If you would like to contact them further or make a 
donation call or write: 


Leonard Wood Memorial 
American Leprosy Foundation 
_ 11600 Nebel St, Suite 210 
Rockville MD 20852 

USA 


Tel# 301-984-1336 
FAX# 301-770-0580 


The following is his letter in a prettv much unedited 
form. Enjoy the reading. 





A SELF-PROFILE OF 
A COMMODORE USER 


BY ROBERT B. LAUDER, JR. 


Dear Mr. Brown: 


This is in response to your request as to how I use the 
Commodore 128. The following programs are the ones I 
use: 


1. Timeworks Wordwriter 128 
Reports and lengthy correspondence 


2. PCFILE-80 (CP/M): 


Cataloging a recorded music library 
Personal asset records 
Membership records for our amateur radio club 


3. DataComp-Business Manager-General Ledger (CP/M): 
Financial records for the Leonard Wood Memorial 
(aka American Leprosy Foundation) 
Personal financial records 


I am not into programming - a computer is a means to an 
end, not an end in itself. I want a program to provide 
a certain function and do not have the patience to 
program. I do not have a modem and therefore I am not 
into online communications. I have an advanced class 
amateur radio license and communicate with fellow 
amateurs, many of whom have computers. So far I am not 
into graphics, desktop publishing, or games. I have a 
couple of games but seldom have time to play them. 


I have a B.A. in Accounting, acquired after 11 years of 
evening classes at the George Washington University, 
and in 1979, retired from the Federal Government as a 
division budget officer at the National Institutes of 
Health in Bethesda, Maryland. 


In 1980, I became the accountant for the Leonard Wood 
Memorial which is also known as the American Leprosy 
Foundation. This non-profit, medical research 
organization was founded in 1928. . Administrative 
headquarters are in Rockville, Maryland and research 
laboratories on the grounds of a Philippine leprosarium 
in Cebu City, The Philippines. 


In 1983, we moved from Rockville, Maryland to 
Fairfield, Pennsylvania (eight miles west of 
Gettysburg). Since then, I been the accounting 
consultant for the Leprosy Foundation. After I 
acquired my first computer, at age 62 in 1985, the 
Leprosy Foundation let me computerize their manual 
accounting system and I prepare 


all their monthly financial reports on 
my Commodore 128 at home 


from summary data prepared by their bookkeeper. I keep 
in touch by telephone and financial data is either 
mailed or faxed to me and I make trips as necessary to 
their Rockville office. 


My first computer was a Commodore 64 which I obtained 
with the intention of using it for amateur radio. I 
soon became intrigued with the possibility of using it 
for accounting - entering figures once and Letting the 
computer prepare the various reports. 
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I tried a number of general ledger programs for the 
C-64 but none had the two basic characteristics needed 
for the Leprosy Foundation’s financial requirements. 
All of the Foundation’s research projects are funded by 
grants, mostly from foreign sources which do not 
recognize overhead. It is necessary to allocate all 
expenses, however small, to the various projects 
instead of just charging direct expenses and then 
allocating indirect expenses via one or two overhead 
amounts. 


With 29 active projects, any of which could use ail of 
the 42 expense categories, plus accounts for balance 
sheet and income items, the basic requirement is for at 
least 1,500 general ledger accounts. In addition, 
eight alpha/numeric characters are required for 
charging expenses to the projects (i.e., 120A/530). 


At this point, some consideration was given to 
obtaining an IBM compatible computer. My brother's CPA 
firm sent me summaries of over 35 accounting programs 
in MS-DOS. However, none of of these had the ability 
to provide both the capacity for the large number of 
accounts and the eight characters for the account ~ 
number. 


Fortunately, in 1986, I saw an ad in RUN Magazine for a 
general ledger program. The price in the ad was $39, 
although I later was sent an invoice showing the 
original price as $450 discounted this once to $39. 
After paying a lot more for C-64 accounting programs 
that did not work as advertised, I reasoned that it was 
worth taking a chance and I ordered this program - the 
DataComp-Business Manager- General Ledger. 


After thoroughly reading the manual and listening to 
the tutorial audio cassette, I took another chance and 
purchased a Commodore 128, (2) 15/1 disk drives, and a 
Magnavox RGB monitor because this program was in CP/M. 
I had previously purchased two reconditioned Commodore 
printers, a DPS-1101 (actually a Juki 1000) daisy wheel 
and a 1526 dot matrix. 


This general ledger program was obtained from Software 
Marketers & Publisher, Grants Pass, Oregon. The owner 
of this firm died suddenly in 1987 and one of the 
employees. a Mr. I. J. Blevens. took over the business, 
changed the name and moved to another location in 
Grants Pass. Other than having a brief conversation 
with Mr. Blevens when he told me the new address. he 
has not responded to numerous letters or messages left 
on his answering machine regarding possible upgrades, 
etc. and even Gale Rhoades, then Executive Director of 
FOG or her friends in Oregon were unable to contact Mr. 
Blevens. 


This program might be a good candidate for a public 
domain program but I have no idea how this might be 
accomplished. Futhermore, while this program is 
excellent for the Leprosy Foundation’s requirements, it 
may not be suitable for one conducting a public 
accounting practice. It takes quite a lot of time to 
enter the data and each item has to be entered, one at 
a time instead of compound entries but to offset this, 
it has several features which can immediately detect 
errors in entering the data. 


If there is any interest by Parsec or others in this 
program, I would be glad to provide additional 
information as I have been using this program since 
1986 with excellent results. At least I purchased the 
C-128 system the right way - bought the computer to 
run the program. 
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In 1991, I bought the following for my C-128 system: 


(2) 1581 disk drives, now used almost exclusively for 
all programs. 


A Star NX-1000C Rainbow dot matrix printer (painfully 
slow in the NLQ mode). 


A used (but tested) C-128 to use as backup, if ever 
necessary. 


64K Video Ram module for the flat C-128. 


The CMD 1 Mb RamDrive with JiffyDos chips for all four 
disk drives. 


I was very upset and felt betrayed by CMD when I 

discovered that RamDrive only supports CP/M in the 1541 ~ 
mode in a limited way and neither the 1571 nor 1581 

drives. Their ads indicate that RamDrive is compatible 

with CP/M - the only reason for my purchase. 


I need the additional RAM for data based work - 
cataloging a large music library. I do have Fieet 
System 4 but my limited attempts to try this program 
have been frustrating. I decided this year that if CMD 
was so oriented towards GEOS that perhaps this would be 
the way to go. I have obtained the GEOS program, 
Version 2.0 from RUN Magazine, bought a 1351 Mouse, CMD 
sent me a free copy of Gateway and I'm still waiting 
after four months, to receive GeoFile from RUN and plan 
to wait until I receive this latter program to boot 
GEOS for the first time. (Editor's note: CMD bought 
out the TechMedia/RUN supply of GEOS products after 
this article was written. ) 


I have tried, several times, to copv the Timeworks 


Wordwriter 128 program disk, without success. mts 
(Editor’s note,it must be a old copy protected 
version). 


There are no user groups in a convenient range of where 
we now live. I belonged to FOG until recently. When 
they raised their annual fee to $40 for four issues a 
year and since they are not devoted entirely to CP/M 
now, I decided to drop my membership. I have had to 
teach myself about computers. I plan to continue to use 
my C-128. 


You have my permission to use any of my comments or 
enclosed material for whatever purposes you wish. May 
Parsec have a long and profitable existence. 


Sincerely yours, : 
Robert B. Lauder, Jr. 





_ <C128 . JBEE> 


DR.EVIL 
ONLINE INTERVIEW. 


BY JOHN BROWN 


The following is a unpublished online (GEnie) interview hosted by Farsec, with 


Kent Sullivan of Dr.Evil fame who originally made and sold the Stereo SID and 
Swiftlink RS-232 cartridges CMD now sells. Lack of page room in previous 


issues (due to the smaller page format) prevented us from printing this article 


before now. A very interesting interview with some unique perspectives and 


insights. 


Date: 91-01-10 
Time: 22:48EDT 


Minutes: 

<C128 . JBEE> I like Della Street -:D 
<DR.EVIL> Hi Andrew! 

<(DTJ Andy] A.BERNHARDT> Hi JBEE, Ken 


<C128 . JBEE> 
<C128 . JBEE> 


Hi Andrew and Andy :) 
just a little chat before we start :) 


<C128. JBEE> Kent, how do you have Desterm setup 7 
<C128. JBEE> Hi Tom :) 
<A. BERNHARDT> Hi Tom 


<(Tom] T.ADAMS18> Hi 

<{Kent] DR.EVIL> Howdy . 
<C128 . JBEE> 
<(Kent] DR.EVIL> Finally! 
<C128 . JBEE> 


you got the hang of the nickname : ' 


Golly. JBEE is my nickname suppose ! should use my real 
name -lol 

<({Kent] DR.EVIL> Good point. 

<H .HERMAN1> is here. 

<C128.JBEE> Hi Howie :))) 

<(Tom) T.ADAMS18> Hi Howie 

<(Howie] H.HERMAN1>hello 

<A. BERNHARDT> 
<({Kent] DR.EVIL> Howdy Howie. I love saying that. 
<C128. JBEE> lol 

<({Howie] H.HERMAN1>Hi Guys! 

<(Howie] H.HERMAN1>Was it rough signing on tonite... 
<C128 . JBEE> 
<C128 . JBEE> (tracy) 
<(Howie] H.HERMAN1>Ha 
<C128 . JBEE> 


Hi Howie 


People love introducing my wife as "TBEE” :D 


really? lines were good today, must be the weather down 
there? 

<C128 . JBEE> 
<({Kent) DR.EVIL=> Everything was fine here in Seattle. 


everyone ready to start? 


<(Howie] H.HERMAN1]>everything just sorta went slo 
<[{Tom] T.ADAMS18> Ready here. 

<A. BERNHARDT> 
<{Howie] H.HERMAN1>AOK here 

<({Kent] DR.EVIL> Fire when ready. 

<C128. JBEE> okay.... lights, curtains... action?’ ;) 


Here too 


Tonight we are interviewing Dr.Evil for Twin Cities 128 to 
kick off a series of in depth articles on modems (can you 
say 9600?) and the SID chip. I know Kent and gct a chance 


to meet him at WoC 90, though I imagine our reacers would 


like to Know a little about yourself. Kent, do you want to 


fill in a little about yourself and where you werk? 


<({Kent] DR.EVIL> There’s nothing too exciting. I started Dr. Evil Labs in 
| college (Purdue) with two friends. Our first project was 
distributing Kermit for the C-64. We then developed a 
shareware adventure game system that went nowhere. Then I 
got the bright idea that what the world needed was a SID 


cartridge. I have since graduated and moved to Seattle. 


<C128. JBEE> What is "Kermit"? Besides green -): 


<{Kent] DR.EVIL> 


<C128. JBEE> 


<({Kent] DR.EVIL> 


<C128 . JBEE> 


<{Kent] DR.EVIL> 


<C128 . JBEE> 


<{Kent] DR.EVIL> 


<C128. JBEE> 


<(Kent] DR.EVIL> 


<C128 . JBEE> 


<({Kent] DR.EVIL> 


<C128 . JBEE> 
<(Kent] DR.EVIL> 


<(Kent] DR.EVIL> 


<C128. JBEE> 


<[Kent] DR.EVIL> 





Kermit in the context above is a public domain telecomm 
program that provides an implementation of the basic Kermit 
file transfer protocol plus some useful terminal emulations 
such as DEC VT-52, VT-100 and limited Tektronix 4010/4014. 
Kermit in general is a very flexible file transfer protocol 
designed basically for mainframe <--> mf or mf <--> micro 


transfers. 


Did your idea of the SID cartridge come before or after the 


internal SIDprojects were published? 


Definitely after. I met Mark Dickenson at the first 
"SIDFest’" in Columbus OH in 8/87. 1 then monitored the 
goings-on on Q-Link (gasp!) in the Music Room and decided 
that not enough people could have stereo SIlUs because the 


hardware was hard to install. 


Would you say it is a safe bet that Mark and Sidplayer 10.3 
can be credited with much of the success of the Sid 


cartridge? 


Absolutely. We didn’t have the resources or time to write 
our own stereo SIDplayer. I have been friends with Craig 
Chamberlain (Sidplayer author) a long time, so it’s possible 


that he would have written a player for us. Hard to say... 


How many major versions of the SID cart. did ycu produce, I 


know there was a battery backed version earlier. 


Version 1 was the original. Not battery backec but battery 
powered--you HAD to have the battery to get it to work. 

Then we did v2, which removed the battery and added a first 
level of static protection. We gave CMD our plans for v3, 
which included some cleanup work and further static surge 
protection. I’m not sure if those have gone into production 


or not yet. 


I believe the earlier versions worked from the cassette 


port? 


It’s always been the same port--the “expansion or 
"cartridge" port. There were no extra wires or connections. 


Just a cable to the RCA jack for audio out. 


What were the reasons for turning over the production of the 
SID cartridge to CMD? 


Basically a lifestyle decision. Those of us dcing the work 
found ourselves spending every free minute working on 
company business. With the intro of the SL-23z. we were 
very busy filling orders and building units. Wwe were doing 
this after the regular work day. 80-hour weeks were the 
norm for close to a year. The two principles (Bryan Minugh 
and myself) just ran out of gas. We knew tha CMD would do a 
quality job and might even be able to expand the market. 


Was this also the reason for turning over the SL-232 to CMD? 
yes, the same reasons apply. 

Also, I made a decision that T wanted to pursue my full-time 
career with Microsoft and not ‘further adventures” of Dr. 
Evil. 

Well, it was a good choice since it has made it available to 
many more people.I understand there a few games now that now 


support stereo music. 


That’s great! I only know of one--Mark’s Rockfall 
(Boulderdash clone). 
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<C128 . JBEE> 
<C128 . JBEE> 


<{Kent] DR.EVIL> 


<C128 . JBEE> 


<(Kent] DR.EVIL> 


<(Kent] DR.EVIL> 


<C128.JBEE> 


<(Kent] DR.EVIL> 


<C128 , JBEE> 


<C128.JBEE> 


<({Kent] DR.EVIL> 


<C128.JBEE> 


<C128 . JBEE> 


<{Kent] DR.EVIL> 


Yes, great game. though I haven’t played it in stereo yet. 


What originally made you go out and buy a C64 ? 


My older brother bought one for me! --) I had a Sinclair 
ZX-81 that he passed on to me. and |! liked it but saw the 
limitations. JI used Apple IIes in high school Lut knew 
there was no way to afford one of those. [ didr’t know much 
about the C-64 vs. the Apple feature-wise when I first got 


it. So the motive was basically economic. 


I know you work on IBM clones (maybe even reali cnes:) at 
work. are there any other computers you use wher you come 


nome. or iS it just your trusty C128" 


I have a Mac SE/30. I! bought it just before ! ieft 
college. I like it because it packs a lot of Ocmp in the 
small-box Mac and it goes well with the IIci I use at work. 
My word processor of choice has been MS Word on the Mac for 
several years so I wanted a machine to run it or. Also 


Pagemaker. 


I have a C-128D, 1581, CMD 40 HD, RAMLink w, 1 MB 1750 REU. 
SL-232, SID, etc. 


How does the Ramlink works with the SID cartridge’ 


They work together fine as long as you don't wart tc use a 
REU in direct (mon-RAMLink) mode. If you use the REU in 
direct mode the second cart plug in (where the SID would be) 


is turned off. Same goes for SL-232. 


(btw that’s a power Commodore system for sure 


Open question to tne audience and Dr.Evil. : knew I SID 
myself to sleep often about you people’ 

I just moved into a house. The stereo is now ir a different 
room from the computer so it’s tough to do. I! xylan to get a 


second amp some time. 


I use a couple of Radio Shack amps, not the cleanest sound 


but I Like using the rechargeable batteries! 


So, you must be signed on now with the SL-232, where is that 
plugged in? 
Yep, into the RAMLink. The cart expansion ports on the RL 


are very solid, much more so than the Aprospand. 


<{Howie] H.HERMAN1>Kent, did I see you say that SL can’t work with RL and a 


<C128.JBEE> 


<[Kent] DR.EVIL> 


<C128 . JBEE> 


<{Kent] DR.EVIL> 


<C128. JBEE> 


1750 set to direct? 


yes, standing a REU or any large cartridge is te flirt with 
RFI or brokenboards! 
I believe that's the case. The RL manual says that the 


Direct position turns off the other cart port. 
What prompted you to develop the Swiftlink-232? 


I was on a crusade. At Purdue they developed a service 
where you could get a direct 9600 bps connectior to your 
dorm room for ScheapS but there was no way for me to use it. 
I know that Desterm will supposedly do it thru the user 
port but I never had much luck. ! think the Urix boxes on 
the other end spit out data too fast for it. As it turned 
out, the product didn’t get off the ground until almost a 


year after I graduated. 


For our readers, what exactly is the SL-2327 
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<({Kent] DR.EVIL> 


<C128 . JBEE> 


<{Kent}] DR.EVIL> 


<C128. JBEE> 


<{[Kent] DR.EVIL> 


<[Kent] DR.EVIL> 


<C128. JBEE> 


<{Kent] DR.EVIL> 


<(Kent] DR.EVIL> 


<C128 . JBEE> 


<[Kent] DR.EVIL> 


<C128.JBEE> 


<[Kent] DR.EVIL> 


<C128. JBEE> 


<[Kent] DR.EVIL> 


<C128 . JBEE> 


<[{Kent] DR.EVIL> 


<C128.JBEE> 


<A.BERNHARDT> 


<({Kent] DR.EVIL> 





The SwiftLink-232 is a high-speed serial interface Cartridge 
for the C-64/128 (including CP/M) that allows much faster 
and more efficient serial communication (modem, printer. 
etc). It utilizes the chip that CBM “left out of the 
machines -- the 6551 ACIA (UART) to offload most of the work 
from the CPU. 


How fast does the SL-232 operate? 


Interestingly, ome machine tnat CBM producea -- the Plus/4 
-- has a 6551 in it. 


(yes, is that the TED chip?> 


The 6551’s normal top speed is 19,200 bps. Through a 
clocking trick we have doubled that to 38,4U0 Eps. 


No, the TED is a separate chip that was custom. It is a a 
combo. music and graphics chip, I think. 

9600 modems are coming down to around S400 street price, so 

the use for the really high speed would be from computer to 
computer. How is it for computer to computer transfers ? 

The 6551 is off-the-shelf and is the same UART used, for 

example, in the Apple serial interface boards. 

Not sure what you mean, JBEE -- can you clarify? 

Would the SL-232 be a good choice for computer to computer 
transfers? 

Yes, qualified. If you do things like move files to an 

MS-DOS pe now and then, Big Blue Reader is more convenient 
because there’s no cable. But if you do this type of thing 
regularly, the SL-232 might be more convenient. I think the 
biggest market so far has been BBS owners and 'telecomm 

junkies". :-) ~ 
Have you tried this with your Mac (BBR128 won’t do Mac 

disks). 

Yes. That was the test bench. Works great at 38,400 with 
Desterm. :7~) 

wow, I bet you have a lot of pictures convertec Macpaint 

pixs ;) 

Our user group demo consists of 6 C-64 hi-res screens sent 

from the C-64 running at 38,400 using Xmodem (cops, I mean 

from the Mac to the C-64) and displaying on the C-64. We 

first show it at 1200 to demonstrate the speed difference. 

does the SL-232 have a ram buffer for such higk speed 
telcommunications? 

No. The 6551 does not have an on-chip buffer. Newer UARTs 

such as the NS 16550A (found in many 386 PCs) has one (16 : 
bytes I think). The 6551 was designed in the early 80s 

when RAM was much more expensive. 

well, I think I will open up the conference to free for all 
questions, comments, and chats now. I want to thank you for 
dropping by and for all the past and future 

C1Z6 “articles: <):))) 

Where did you get the name Dr. Evil? 

One of the partners, Roy Riggs. He got that nickname in a 


high school for doing offbeat experiments in 


chemistry class. 








<{Howie] H.HERMAN1>Are there any new 8-bit things vou re doing that we might 


like to know about’ 


<{Kent] DR.EVIL> Nope, nothing. The company will officially close on the 
last day of December. Bryan and I both bought houses so, 


to be honest, that’s where our attentions are these days! 
<({Howie] H.HERMAN1>that’s only fair :) 


<C128 . JBEE> Well, houses are a.major consideration for sure -; BIW: 


Thanks for pumping up the economy -D 
<{Kent] DR.EVIL> You’re welcome. Hah! ee 


<A .BERNHARDT> Do you know of any software that will convert MIDI te 


stereo SIDs? 


<{Kent] DR.EVIL> yes, Frank Prindle’s MIDI <--> SID Connection vz. Should be: 


in the Dr. Evil library here. 


<C128.JBEE> Maybe I will grab it and stuff it on a PD disk for those 
interested. 

<C128.JBEE> Classic Affair.arc here online was designed for midi 
playback, quite good! Just wish I owned a midi interface 


for my cheapo Keyboard. 
<({Howie] H.HERMAN1>Kent what are you doing for Microsoft? 


<[{Kent] DR.EVIL> I am a "Usability Specialist which is sort of like a Human 


Factors Engineer. The group I’m in works to make sure the 


end user’s voice is heard in the development prccess through. 


design reviews and user testing with early versions of 


products. 


<C128 . JBEE> you make sure the Microsoft windows are in the right place? 


(sorry, small pun) 
<{Kent] DR.EVIL=> That’s ok. ae 
<[{Howie] H.HERMAN1>sounds interesting! 


<€128 . JBEE> 


the beta version, eh? 


<[Kent] DR. EVIL> I love it. Amen, JBEE. Product support costs kili some 


companies. 


<{Howie] H.HERMAN1>Have you run across conflicting wants? and what happens 


then? — 


<[Kent] DR.EVIL> sure. It’s all data and it’s up to the program designers to 


make the final choices. We depend on a variety of 
quantitative and qualitative measures to hopefully make 


decisions easier. 


<C128.JBEE> What piece of Microsoft software is your personél favorite? 


<{Kent] DR.EVIL> The one I use the most is Mac Word. My favorite probably is 
something that hasn’t been released yet. :-) 
<C128.JBEE> 


keeping us on the edge of our seats :-) 


<{Howie] H.HERMAN1>Do you get involved in any Micro sysoping support on the 


services? 
<[{Kent] DR. EVIL=> No, I’m not involved with the MS online support. 


<{Kent] DR.EVIL> We shipped over 250 products last year. counting 


localization for different foreign languages. 


<C128. JBEE> 


( I think I read today MS shipped 300,009 copies of Windows 


to Japan sc far) 


Better to’ correct mistakés at the beginning instead of after. 


SSS TRIM rR Aen e METER EREIRR R CEE 


<C128.JBEE> 


What is your favorite piece of software ‘besides Desterm and 

Sidplayer) on the C-64” 

<({Kent] DR.EVIL> Probably the game “Uridium" from England. Awesome. 

<C128; JBEE= Uridium! On of my favorites too. once you are past the 

copper you are golden;: 1! send a Uridium game pack (not 

pirated!) to a TC128 author who wanted a shoot-um up and 

he says it is too tough! :D 

<{Kent] DR.EVIL> Are you selling the commercial version or * [.-didn’t quite 
get that 

<C128.JBEE> Now, I just happened to have a couple of used copies from 

buying C128 systems :) I guess tater versions were packaged 


with TOP GUN on the same disk 
<{Kent!] DR.EVIL> Ah! Gotcha. Thanks everyone. Talk to you socn! 
<C128.JBEE> 


thanks you *bye* 


<A. BERNHARDT> 
<{fHowie] H.HERMANI1>Nite Kent. Nice see’in ya''!'! 


G’nite Kent 


end of transcript. 


Copyright 1991 by Parsec, Inc. 


DR.OCTAL’S 

SHARP OPERATING TIPS 
<TM> 

Tip &0013 

USING THE FD-4000 


From: John W.Brown 
The FD-Tools program on the FD-4000 disk is handy and 


very easy to use. However, if you are formatting 20 or 
more disks, that means cursoring this wav and, that, and 
replying to all those menu prompts over and over. it 


also takes time and requires vour attention. Not to 
mention it can get boring and tedious having to answer 
the same set of questions twenty times in a row. So I 
just use this small Basic program, that requires a 
minimum of attention, to format disks while I read junk 
mail. 


How to format a Extra High Density disk using Basic. 


10 rem ft=hdn 4 megs 
20 open 15,dn.15:print#15."nl.name.id. ft". close 15 


30 openl5,dn,1l5:input#l5.e.e$.t,s:closel5:print 
e,es,t,s 


Tip &00la4 

USING GEOS 128 

From: John W.Brown 

This problem was originally solved for me bv either Jim 
volLette or Robert Knop. so | can not take credit for 
Le When you want to escape from GEOS 128 V2Z.U using 
the reset button vour system becomes locked and the 80 
‘continued on page 48) 
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GeoStamp REVIEW 


BY JOHN W BROWN 


Quincy Softworks "GeoStamp" disk is a collection of 
three GEOS programs, GeoStamp, StampEdit. StampCollect. 
and various data files to be used with GeoStamp. The 
purpose of the GeoStamp set of programs is to replace 
the cut - edit - move - option in geoPaint with a far 
better set of tools that let you easily and accurately 
cut and paste within a geoPaint document. 


This is just about the best GEOS add-on I have ever 
used and it changes the nature of geoPaint entirely for 
me. There have always been many things I disliked 
about GEOS and one was the clumsy editing in geoPaint 
when trying to paste Photoscraps or to paste cut 
objects back onto the page. GeoStamp does such a good 
job I would consider it a "must have" for any serious 
GEOS artist. It works on the C-64 and on the C-128 in 
forty and eight columns. GeoStamp and Stamp Collect 
are Desk Accessories that can be called from within 
geoPaint. | 


GEOSTAMP 

GeoStamp allows you to take up to thirty previously 
drawn pictures (or captured images) in a “stamp" 
collection and paste (stamp) them just about anywhere 
on a geoPaint document, within certain limitations. 
Using the forty column or eighty column screen you can 
not paste an image beyond the boundaries of the screen 
you are viewing. You have to scroll the screen and 
start your pasting of the "stamp" all over again. This 
is not so much a fault of the program, but the system 
and how GEOS stores documents. 


A "stamp" is a small bitmap that vou can use to stamp 
images on the screen. You can stamp a image into a 
solid background, leaving behind only the lines or 
bitmap of your drawing, or you can use another option 
and erase everything under the stamp when you place it 
onto the screen. Think of stamps as small pieces of 
clipart. 


Where you’ are on the screen is displayed by X and Y 
pixel coordinates, which makes placing stamps much 
easier. A feature that is absolutely beautiful is an 
option to move the stamp according to "pixels", the 
width of the stamp, or by color cells (8 pixels). 


The "S" option, for "S"tamp width, lets you 
effortlessly lay down a tiled imaged across the screen 
with all the borders and edges of the stamps lined up 
evenly. You do so by pressing the cursor keys to move 
the stamp and the P key to Place it. The other option 
lets you move the stamp with the cursor key by color 
cells, 8 pixel increments. This is very handy if you 
want to fill the image in with color later and want to 
avoid the “jaggies" or "stairs" of color in the printed 
out image if you own a color printer. Being able to 
move the stamp image with the cursor keys makes 
placement precise and accurate. You can also use vour 
input device, but I prefer the cursor keys for the 
final placement. 


Another good feature is the ability to turn off the 
coordinates for a smoother freehand drawing when 
placing multiple stamps over an image. This did not 
really effect the eighty column screen much, if at all, 
but was noticeable on the forty column screen. 
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STAMPS | 

Picking stamps from within a stamp collection is easy. 
You just use the #1 key to scroll backwards in the file 
and the #2 key to scroll forwards in the file. If you 
are on one of the boundary numbers. #1 or #30, you can 
still use the number keys to scroll backwards or 
forwards through the file. Example, if you are on 
stamp #1 and you want to reach stamp #30, all you have 
to do is press the #1 key and the stamp file will 
scroll backwards and stamp #30 will appear. You do not 
have to scroll through the other twenty-nine stamps to 
get at the one you want. 


StampCollect and StampEdit are two companion programs 
that enable you to build (StampCollect) your stamp 
collection beyond those provided on the disk and to 
edit (StampEdit) existing ones. The amount of stamp 
collections you can have is only limited by disk size. 
Since all three programs work basically the same, I 
only want to touch briefly on the following subject. 


StampEdit was designed and meant to be used on the 
forty column screen so when you use it on the C-128's 
80 column screen the dialogue boxes do not always line 
up or erase part of the screen like they should. I 
think the only way around this would have been separate 
80 column versions programmed only for the C-128. 
Though this would have been nice, GeoStamp is the main 
program, works fine on the C-128. and is the main 
reason for buying the package. Usually I subtract from 
the rating for something like this, but the main 
program GeoStamp is so nice to use and filled with such 
strong features like rotating a stamp on its X and Y 
axis, I did not. 


SAFETY FIRST 

When you quit a GeoStamp application without pressing S 
to save your data, you get a dialogue box prompting you 
if you want to save your data or not, before destroying 
it by exiting the application. 


I tried my to make this program fail or corrupt data, I 
was not successful. Oh well! It was tested using 
Gateway V2.5 and worked well except that the ESC key 
for using Switcher on the C-128 happens to also be the 
key used by the GeoStamp applications to undo a past 
event on the C-128. This is not really a problem 
because you can use the C key to clear a stamp image 
and the U key to undo a placement of the stamp. All it 
means is you can not use the Switcher feature while 
using GeoStamp. 


WHAT DIDN'T I LIKE 

Sorry, I liked everything and was basically enthralled 
from having something that makes geoPaint worth using 
for me : - ) 


There are a few things that could be improved. The 
data files should be changed so the 40/80 column flag 
is set. Then the application can be launched on the 80 
column screen by clicking on the data file. This is 
not how I usually launch my applications, though many 
people enjoy doing it this way. You can set the flags 
yourself with various PD utilities but you should not 
have to bother doing that since you are paying to use 
the program. 


There is no printed manual. I understand this is to —. 
keep the costs down on both the product and the 

shipping. Considering the low cost of the product and 

the shipping, this is acceptable. Especially when all 

the features and commands are reproduced on the help 

screens, which can be accessed by pressing the H key. 


The manual is provided on the disk in geoWrite format 
which is okay, but this being GEOS I would have liked 
a geoPublish version that I could have dumped to my 
Postscript printer for really nice looking 
documentation. 


Grade: At 
Price: $13.95 


Checks or money orders, U.S. funds. CA residents add 
sales tax, overseas add 15% for S&H 


GEnie: DiBieF" 

Quincy Softworks 

9479 E Whitmore Ave 
Hughson CA 95326-9745 
USA 


MOUSE-CARE 


By JAMES ROBBINS 


I was under the impression that the mouse I use needs 
no more care than cleaning the ball once in awhile. as 
per the instructions in almost anv mouse manual. But. 
after three dead mice. I have learned the hard wav that 
is not always so! 


Because of my three dead mice, I was forced to find a 
solution to keep mice healthy and happv. If vou Live 
near a smog-riddled city, like I do. and vou use vour 
mouse on one of those ‘mouse-mats'. I have some care 
tips for you. 


Get a VCR cleaning kit. like the ones sold at Radio 
Shack. The kit should include cleaning sticks. 
cleaning fluid, and a white anti-static glove. Yes, 
there are computer chips in mice. Next buv some 
lint-free cloths or towels, which are also sold at 
Radio Shack and other computer stores. You will need a 
can of Static Guard. a anti-static sprav. and a roll of 
masking tape. 


Turn off the computer. put on the static free glove. 
and unplug the mouse. Then remove the ball from the 
socket. which is underneath the mouse. 


Stretch out a piece of the masking tape and roll the 
ball over it to get off the excess dirt and dust. then 
clean the ball with the cleaning fluid and a lint-free 
cloth. 


Next, clean the cover that held the mouse ball in 
place, using the cleaning fluid and lint free cloth. 


If you have a small computer vacuum, it would be a good 
idea to vacuum the inside of the mouse to keep the 
moving parts free of dust and lint You do not have to 
take the mouse apart any further than removing the 
ball, so do not get overly involved. You might wind up 
losing a spring or two and then you would have a real 
non-functioning mouse. 





Now take one of the sticks provided in the VCR kit If 
it is too big to fit inside vour mouse. then cut it 
down to size with a pair of scissors. Put some 
cleaning fluid on the stick. Clean the brass rollers 
inside the hole where the mouse ball rolls around. 

This might take a little practice, as the hole is small 
and the rollers move easily, but it is the most vital 
part of the cleaning! 


The brass rollers should look smooth and shining clean. 
If it looks like it has hair on it. or a kind of 
blackish tape or strip, you are in for some extra work. 
That gunk is a build-up of fibers from the mouse mat 
and plain old greasy dirt. If the dirt builds up too 
much it may unseat the sensors inside the mouse or jam 
the ball in the socket. 


You may have to rub a bit hard to get it off. but that 
gunk is what causes the mouse to get a mind of its own 
when it does not move. Just do not go crazy and rub 
too hard, you might break one of .ne roller supports. 
Just use enough pressure to get off the dirt. 


Set the mouse aside for 5 or 10 minutes so the excess 
cleaning fluid dries. Now put the ball back inside the 
mouse and recover the ball. 


CLEAN THE MOUSE-MAT 

If you stretch out a long piece of masking tape and 
fold it around the roll of tape upside down. vou will 
have a home-made lint remover. This is a good 
technique for vour sweaters and clothes too. Take some 
of the masking tape and roll it over the mouse mat a 
few times to get off the excess lint and dustv dirt. 
After vou are satisfied that the mat is clean. sprav it 
with the Static Guard. This will help save vour mouse 
from static damage. plus. it will help keep dust 
particles from sticking to the mat that cause premature 
cleaning of the mouse. 


There are no set schedules to follow for when to ciean 
a mouse, just clean it when it starts acting erratic. 
All vou need to do is once in awhile remove the ball 
and take a look inside. If the ball or rollers are 
dirty then clean the mouse. 


Keeping the mat free of dust and lint on a dailv basis 
is a better idea and will help stop the mouse from 
picking up too much dust and lint. Also avoid placing 
food and drinks on top of your mouse mat. That 
attracts dirt. 


Happy Mousing!!! 
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CARDFILE/RECIPES 
A SUPERBASE RECIPE 
PROGRAM 


BY AL ORAM 


I have cooked since I was a teenager but not seriously 
until I retired. Once I became involved in cooking (my 
wife was delighted), I began to search for a good 
recipe program. There were not anv recipe programs I 
tried that were satisfactory. until I used Superbase to 
design my own. What I like about Superbase is the 
ability to print what vou want. where vou want it. As 
with all programs there are some things that could be 
improved but Cardfile,recipes satisfies more of av 
requirements than any other recipe database [| tried to 
date. 


1 do not like writing recipes long hand because my 
handwriting is not that good and it was a chore to copy 
recipes for others. As I found recipes that looked 
good. they were entered into Cardfile,recipe. Thev 
were deleted if not found to be a recipe that was worth 
cooking many more times. This method created a recipe 


file that was easv to search for good recipes. You do 
not have to use this method if it does not suit vou. it 
will be your recipe ‘file. ‘You may even find wavs to 


improve the program, or these instructions might give 
you ideas on how to develop a recipe program using 
another database. 


cardfile, recipes uses "Superbase for the Commodore 128 
yersion 3 V0" as the database. Superbase was selected 
because the printing function was flexible enough to 
print the recipes onto 4 x 6 cards and the editing 
function was easy to use. A disk containing the 
necessarv programs for Cardfile/yrecipes. and manv 
recipes. is available on the TC-128/64 Companion disk. 
For those who want to create vour own data disk. vou 
must enter vour own recipes. 


There are other applications for a database of this 
tvpe using 4 x 6 cards for hardcopv. Informational 
records. such as material used for repairs ‘identitv 
and where to get it) or personal information (social 
security numbers. birthday gift choices, etc.) are ways 
to use this file. This approach to a database is good 
for records with fields that contain random data 
(unstructured). The recipe record has three fields 
that are structured. name, category ‘bread. soup. 
salad, etc.! and type of recipe. The other 18 fields 
are unstructured. 


The following instructions are written for a novice 
user of Superbase (experts please be patient). After 
the instructions for creating Cardfile/recipes, there 
will be a few helpful hints and some of the problems, 
with solutions. that you may encounter. 


PREPARING THE DATA DISK 

Format a disk before loading Superbase. The disk must 
be formatted for the data (recipes) with a disk name 
that will identifvw it. something like "sb data disk 1" 
will do Next the Superbase programs listed in 
TC-128/64 must be saved to the disk. and then the 
recipes entered. 


Load Superbase. put the formatted data disk in the 
drive and select RETURN from the prompts on the screen. 
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Press RETURN again to get to menu 1 and again to get to 
menu 2. Press F5 (prog) to get the memo screen. The 
screen will be blank. Now type in the program START.P. 
On the line following line 190 enter SAVE"START (or 
save"start.p - either one works) and press RETURN. The 
program will be saved to the data disk. 


Start.p on line 140 refers to a memo (help) that puts a 
menu on the screen listing the programs available. The 
menu gives a choice of using a program or going to menu 
1. To create the memo. press CONTROL Q_ to return to 
menu 1 then press return for menu 2 and then press F/ 
(memo) to get to the memo screen. A prompt will ask 
for a name. Enter CARDFILE/RECIP (this filename must 
be the same as that on line 140 in start.p) and press 
RETURN. Type in a title for the menu (List of 
programs). Press RETURN to obtain a blank line to 
separate the title from the list (or between items). 


Enter (without quotes) 
"]. RECIPES - Print all recipes to 4 x 6 cards". 


Then the next line 
"2. SELECTRECIPE - Select recipe and print to 4 x 6 
cards". 


The third line is 
"3. RECIPELIST - Print names of all recipes on 8 1/2 x 
11 sheet". 


The fourth line 
"4  SORTRCPTLIST - Print list sorted bv categorv,. type 
on 8 1/2 x 11". 


And the fifth line 
"5. DISP - (Display) go to menu lL". 


Insert a couple of blank lines and type in at the 
prompt, 7 ae 


"Enter a number ‘1 to 5) from the keyboard". 


Press Fl then RUN/STOP to save the memo. The filenames 
with numbers must be in the same order as the fiienames 
on line 190 of Start.p. 


Now type and save the programs RECIPES.P, 
SELECTRECIPE.P, RECIPELIST.P. SORTRCPTLIST.P and 
DELETE H8.p as instructed in a previous paragraph for 
entering START.P After each program is saved. enter 
NEW to clear the screen then type in the next program. 
The disk will then have all the required programs. 


Make a copy of the disk for future use and in case you 
make mistakes. Press CONTROL Q to return to menu 1 
then press RETURN to get menu z and select F6 


(maintain). From the maintain menu, select F6 
(backup). Have a blank disk ready. Follow the prompts 
for formatting the disk and for a disk name enter - sb sen 


data disk 2,sc. The prompts will request a source disk 
(the disk that you will copy) and a destination disk 
(the blank disk that has just been formatted). Follow 
the prompts to copy the source disk. The copy will be 
useful, if more than one data disk is planned. 


ENTERING RECIPES ON THE DATA DISK 

The disk now has all the required programs. Before 
entering any recipes, the database name. file name. and 
record format must be entered. After saving the last 
program to disk. clear the screen (new) then press 
CONTROL Q to return to menu 1, then press the space 
bar to get into the command mode at the top of the 
screen. Type - database"cardfile" Press return, 





press the space bar to get back to the command mode and 
type - file"recipes" then press return. The name of 
the database and the file are now on the disk. 


A format for the record is next: refer to the Superbase 
manual pages R-8 through R-26 for detailed 
instructions. Select F2 (format) from menu z. Type 
"name" (do not type in the quotes) then press Fl and a 
K to signify that the field is a KEY field. Press the 
right cursor key 30 times (a count will show at the top 
right corner of the screen). Use the cursor keys to 
add or reduce spaces. Press RETURN to set the field 
and a return to go to the next line. Enter the label 
"textl" (no quotes) then press Fl and aT for a text 
field. Press the cursor key 55 times and then RETURN 
to set the field The next 1° fields are TEXT fields 
labeled "text2" through "textl8", thev are 55 
characters long. The last two are labeled "category" 
and "tvpe" and are text fields 20 characters long. 

When finished press Fl then RUN/STOP to save the record 
format. The disk is now ready for the entry of 
recipes. 


Plan how to type in the recipe. For example: if the 
recipe is long. enter two ingredients on one text line, 
use abbreviations for words (Tbsp for tablespoon etc. ) 
and reduce the verbiage in the instructions. 


Press CONTROL Q_ to return to menu 1. Press Fl 
(enter) and the format of the record will be on the 
screen. The cursor will be in the KEY field (name). 
Have a recipe ready. Enter the name of the recipe in 
the key field then press return to get to the next line 
(textl:. From the keyboard, enter the ingredients and 
the instructions. Use the cursor keys and return to 
move about the screen. Press RETURN to get to the next 
line .field). Spaces are counted as characters. Avoid 
using symbols such +, :, /, ", =, etc. They will 
sometimes give problems during the printing of your 
recipe hardcopy. The two known safe characters are a 
period and a comma. A blank line can be obtained bv 
just pressing RETURN at character 1 in the field. 


The next two text fields are CATEGORY and TYPE. 
Category can be beverage, bread, dessert, entree, 
miscellaneous. salad, sauce, snacks. soup. etc. Type 
is the type of recipe within category. Within the 
category of entree could be the type of recipe such as 
meat, mixed dish, oriental, pasta, pie, pizza, | 
vegetable, etc. and within dessert you could have types 
such as cake, cookie, fruit, gelatin, pie. pudding. 
etc. Create categories and types that will divide the 
file into groups of recipes that make the file easv to 
use. It is easy to revise the entries in categorv and 
type. if you do not like the first attempt. 


A 3 1/2 INCH DISK AS A DATA DISK 

Superbase 3.0 is compatible with the 1581 disk drive. 
The best way to make use of this feature when saving 
recipes, is to set the dip switch on the 15/1 and 1581 
drives to device 8; then turn OFF the 1581 when loading 
superbase and when loaded, shut OFF the 15/71 and turn 
ON the 1581, before pressing return. The 3 1.4% inch 
disk will hold approximately 500 recipes. 


First the 3 1/2 disk must be formatted with :HEADER"SB 
DATA DISK i",ISB,D0.U9). if the 1581 is set as device 
9. If the 1581 is set at device 8 and the 15:1 drive 
is off, (HEADER"SB DATA DISK 1",ISB) will do. 


Load Superbase, shut off the 15/1 drive and turn on the 
1581 drive (both set as device 8) and enter the 6 
programs (as instructed for the 5 1/4 inch disk;. Then 


enter the datafile and file names (cardfile and 
recipes). Next enter the file format. The disk is 
then ready to enter your recipes. 


TEST THE PROGRAMS: 

When several records have been saved. it is time to 
check out the programs. From menu 2 select F5 (prog). 
Enter load"filename and press return (entry of the 

" p" following the filename is optional). Filename is 
the name of any of the five programs that were put on 
the disk. Have the printer ready. It is not necessary 
to have cards in the printer for this check. Press 
CONTROL Q to return to menu 1 and select F’ (execute) 
and the program that is in memory will run. If the 
printer does not work correctly. check the program for 
errors. If the recipe is not printed correctly. or 
completely, check the recipe for control characters 
such as, colons, quotes, etc. Check out all programs 
except "delete h8.p" Delete h8.p can be checked when 
it is necessary to delete some programs. 


If you want to create a large file of recipes, plan on 
how to divide the recipes between two or more data 
disks. A 5 1/4 disk will hold about 200 recipes. A 3 
1/Z disk will hold about 500 recipes. 

PREPARING ADDITIONAL DATA DISKS: 

First print a list of the recipes using 
SELECTRCPTLIST.P.; From menu 2 press F5 (prog) then 
enter NEW to delete the current program and enter - 
load"sortrceptlist. Return to menu 1 (have the printer 
ready) and press F/ (execute). This list will be a 
handy reference when dividing the data from one full 
disk onto two or more data disks. 


FIRST METHOD: 

The first method requires copies of the full disk and 
the deleting of the unwanted recipes for each disk. If 
more than 200 (or 500 for the 3 1,2 disk) recipes are 
to be entered a second disk must be made. The recipes 
should be broken into one or several different recipe 
categories for each disk. Do not fill the disk before 
creating a second disk. leave some room on the disk for 
a file and a program. Make as many copies of the disk 
as needed for the division of the files. Use the 
BACKUP command on the maintain menu. Maintain is on 
menu 2, press F6 (maintain) and then from the maintain 
menu press F6 (backup). Do not use a file copy program 
to copy the data disk! <a "nibbler" will work okay) 
Follow the prompts. When asked for a disk name enter 
"sb data disk 1" and for the second disk "sb data disk 
2" and so on for as many data disks that there are 
planned. The disk ID should be unique for each disk. 
It is worthwhile to copy an extra disk for a backup in 
case of a mistake. The records of the categories not 
wanted are deleted from the disks in two ways, one by 
category and two individually. 


To delete by category: From menu 2, press F5 (prog) 
type NEW to delete the current program and then enter 
the program DELETE H8.p. Save"delete hb to each of the 
above disks. Return to menu | and press F3 (find). 

The format template will appear on the screen with the 
cursor on the kev line. Move the cursor to "“categorv" 
and enter the name of the category to be deleted. 

Press RETURN twice and a search for the records in that 
category will take place. The name of the record will 
show on the screen as it is found. These names will be 
automaticallv stored as "h8list". Return to menu 1 and 
press F (execute) to activate the program "delete h8". 
Repeat this process to delete other categories not 
wanted on that disk. Insert another disk and delete 
the categories not wanted on that disk. There will be 
different categories on each disk when finished. 
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"database" and "file" commands. Otherwise you might 
corrupt your data disks. 


To delete individually: Insert one of the copied disks 
into the disk drive. From the menu | command line 
enter the database and file name. From menu | press F2 
(select). From the select mode press F6 (first) and 
the first recipe on the kev List will appear on the 
screen. Check the name of the category on the first 
record and if the record is to be deleted, press D toe 
delete it. press Y¥Y to confirm the delete. Press N 
(next) to get to another record. Repeat the process 
until only the categories wanted remain on the disk. 
Repeat the process for the second ,and third if 
required) disk. 


SECOND METHOD 

A second method for making a second data disk that 
would eliminate the work required to copy the disk and 
delete records. is to make a second disk in the same 
manner as the first. Use the prepared disk. the one 
that has only the programs on it. Do not divide the 
categories between disks, just make the second disk in 
the same way as the first. The same categories will be 
on both disks. This method is not as neat as the first 
but it is easier. 


COPYING TO A 3 1,2 INCH DISK 

Set the 1571 drive to device 8 and the 1581 drive to 
device 9 using the dip switches. Turn on the computer 
and both disk drives but do not load Superbase. After 
READY shows on the screen format the 2 1/2 inch disk 
‘HEADER"SB DATA DISK I1".ISB,DO.U9) Next place the 
Superbase program disk inco the 15-1 drive press F2 for 
Dload and enter UTILITY128. 


Utilityl28 will give you the option to "1. Recreate 
database" or "2. Copy non-database file". Press 2 to 
copy the programs from the 5 1/4 inch prepared disk to 
the 3 1,2 inch disk. empty but formatted. Enter the 
filename START.P press Return to select 8 and O from 
the next two prompts. The next prompt will be an 8. 
delete the eight ‘with the DEL key) and enter a 9 © 
Press Return to select the next O and the copving will 
begin. The copying will be done when READY shows on 
the screen. If vou have forgotten the other file 
names. press F3 to see the directory of drive 8. Then 
after Readv. enter RUN to return to the copy program. 
Repeat the above sequence for for ali the files listed 
in the directory. except Cardfile and Recipes. 


When all the programs have been copied. select 1 
(Recreate Database), enter DATAFILE and RECIPES and the 
utilitv program will copy all the recipes on the disk 
in drive 8 to the disk in drive 9. The 3 1/2 inch disk 
will have all the recipes that were on the 5 1/4 inch 
disk and will have room for 300 more. 


To use this disk. have both disk drives set as drive 8. 
With the 1581 drive OFF. load Superbase and when the 
prompts show on the screen turn OFF the 15/1 drive and 
turn ON the 1581 drive. Press RETURN and the 3 1/2 
inch disk will be the data disk. 


COMMENTS AND HINTS. 

if two or more data disks are being used. do not 
exchange disks without entering the database name and 
the file name for the second disk. After putting the 
second disk into the disk drive. return to menu l. 
press the space bar, and enter DATABASE"CARDFILE. press 
return and next on menu l enter FILE"RECIPES and press 
return. An error message “INDEX MISMATCH" will show in 
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database name is not entered and the "file selected" 
box will be blank until the file name is entered. Even 
if the disk is a copy of another disk, the database 
name and the file name must be entered. 


Spaces entered at the beginning of a field in a record 
will not remain unless there is a character in the 
first column. Sometimes spaces to indent text are used 
to accent paragraphs. To enter spaces enter a” ." 
(period: as the first character then the spaces The 
period is hardly noticeable when printed. 


On the prepared disk of recipes from Parsec. the name 
of the recipe is entered in capital letters. When 
using capitals do not enter a shifted space between the 
words in the name. The shifted space creates a 
printing problem. 


Category and type are used to arrange (sort) the 
recipes in a list or in the hardcopy file (a box of 
recipes) so that a recipe can be easily retrieved, 
replaced correctly, or found when missing. The printed 
list created by SORTRCPTLIST.P is invaluabie as a 
double check of the recipes. If you enter a new 
recipe. write its name on the list as a reminder to 
print a card later. 


The index cards in the hardcopy file are arranged with 
a category card followed by several type cards. If the 
category index card or the tab on the card is a 

different color than the tvpe index card, it is easier 
to locate a recipe in the file. With the category and 
type printed at the bottom of the card, it is easier to 
replace the card correctly in the hardcopy file. 


Those with the prepared disk of recipes from Parsec vou 
will find under the category of bread, type veast, that 
the names of a few recipes that begin with BB. BB 
means Bread Baker. The amounts of the ingredients are 
adjusted for an automatic Bread Baker (Panasonic) that 
makes one | lb. loaf. The same bread made manually 
(two loaves) may also be on another card, but, without 
BB before the name. 


Printed copies of programs, memos or file definitions 
are made as follows. 

Programs: From menu 2 press F5 (prog) and load the 
program. Press CONTROL Q_ to return to menu l, then 
type PRINT: LIST:DISPLAY on the command line. 


Memos: From menu 2 press F/ (memo) and type in the 
name of the memo. If the memo screen remains blank. the 
name of the memo was entered incorrectly or the memo 
does not exist ‘check the directory and trv again). 
When the memo shows on the screen, press Fl then P to 
print the memo. 


File definitions: From menu 1 type PRINT: STATUS: DISPLAY 
on the command line. 


The cards used are Uontinuous Index Cards for computer 
printers. one wide. 100 lb. stock. 4 x 6 inches. Two 
known firms that make them are. Rediform (#06731: and 
Avery. Both are usually stocked at Office Supply 
Stores such as Office Max and Staples. The size of the 
card may be listed as 4 x ’, six inches plus the 
tractor feed width. If they can not be found in the 
local stores, ask them to order some for you. 


I hope that Cardfile/recipes is useful for you. I have 


enjoved it for two reasons; it helps when cooking and 
it gives me another use for my Commodore computer. 
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File Definition : cardfile/recipes , 60 display @10,5"1. Enter list of recipes"@10.8"2. Press Fl,stor at end of 


# name type Format/ Calculation list"@10,14"3. Press any key to continue” :wait 
fee Se SSeS RR See aa SSS See See SSeS Pe aS se 70 memo ‘h8recipelist":rem this is the list of recipes entered 
i name Key length 30 80 report "recipes":rem identifies file used 
2 textl text length 55 90 print:across:cont l 
3 text2 text length 55 100 plen 24:tlen 24 
4 text3 text length 55 110 output from “h8recipelist"@3,1[name]plus:rem output from memc line 70 
5 text4 text length 55 120 @3,3[text1]@3,4[text2]@3,5[text3]plus 
6 text5 text length 55 130 @3,6[{text4]@3,7[text5]@3,8[text6]@3,9[text7]@3.10[text8]plus 
7 texts text length 55 140 @3,11[(text9]@3.12[text10]@3,13[text11]@3,14[text12]@3,15[text13]plus 
8 text/ text length 55 150 @3,16[(text14]@3,17[text15]@3,18[text16]@3.19{text17]@3,20{text18]plus 
2 texté& text length 55 160 @3,22[category]@30,22[type] 
Le textg9 text zength 55 170 endreport:display:menu:plen:tlen:rem resets parameters 
11 textld text Length 55 
12 textll text length 55 
13 text12 text length 55 5 rem copyrighted commercial software from TC-128/64 #34 by parsec inc. 
14 text13 text length 55 10 rem: RECIPELIST.P 
to text14 text length 55 20 rem:This program will print a list of ALL recipes by [{name: or 8xli sheet 
a 16 text15 text length 55 30 file “recipes” 
17 text16 text length 55 40 crS=chr$(13):lfeed 0:space 0 
18 text17 text length 55 50 print:across 
19 text18 text length 55 60 output all [name] 
20 category text length 20 70 endreport: display 
21 type text length 20 
5 rem copyrighted commercial software from TC-128'64 #34 by parsec inc. 
PROGRAM NAME: start.p 10 rem:SORTRCPTLIST.P 
20 rem:This program will print a list of recipes sorted by [category] 
5 rem copyrighted commercial software from TC-128/64 #34 by parsec inc 30 rem:and [type] on an 8x1l sheet in three columns Category, Type and Recipe 
10 rem Superbase start program Name 
20 rem *** set system parameters *** 40 Imarg 5:crS=chrS(13):plen 66:tlen 62:rem set parameters 
30 lmarg 1:rmarg 80:rem margins 50 dG ne rrr eecee : 
40 plen 66:tlen 60:rem page & text length 60 sort all on [category][type]to "sortrecipe':rem sort file 
50 pdev 4:pdef 0:rem printer device 4 cbm code 70 print:across:cont 1 
60 lfeed U0:cont 1:rem no line feeds, continuous print 80 report ‘recipes” 
70 space O:across:rem print across page ‘ 85 rem CREATE TITLE AND HEADING 
80 screen 0 90 title @20"CARDFILE - Recipes"crScrS@15"Recipe List by Category and Type"crS 
90 rem *** SELECT DATABASE AND FILE *** crS"Category"@16"Type"@32"Recipe Name’@1dS 
100 database ‘cardfile':file “recipes” 95 rem PRINT LIST 
110 rem LOAD PROGRAM NAMES INTO ARRAY ‘ 100 detail from ‘sortrecipe’&[{category]&@16 [type] @32 [name] 


120 for i=lto 5:read prgS(i):next 
130 rem MENU STARTS HERE 
140 help ‘cardfile/recip’:rem this file for the screen 


150 display @0,5" °; 80 rem DELETE H8.P 
160 wait op:if(op<l)or(op>5)then 160:rem select number 1 thru 5 90 file ‘recipes" 


110 endreport:display:menu: lmarg 


170 if op=5then menu 100 select from "“h8list":eol menu 


110 select d 
120 goto 100 


180 load prgS(op):rem load the selected program (1 thru 4) 


190 data recipes,selectrecipe,recipelist.sortrcptlist disp 


5 rem copyrighted commercial software from TC-128/64 #34 by parsec inc. 
10 rem:RECIPES.P 
20 rem:This program will print out ALL recipes onto 4x6 cards 
30 file ‘recipes’:rem identifies file chosen 


40 print:across:cont 1 


TRANSACTOR MICROFICHE 


50 plen 24:tlen 24:rem page and text length for 4 x 6 cards 

60 output ali @3,1[name)plus 

70 @3,3[text1]@3,4[text2]@3.5[text3]plus 

80 @3,6[text4]@3,7[text5]@3,8[text6]@3,9[text7]@3,10[text8]plus 

90 @3,11[text9]@3.12[text10]@3,13[text1i]@3,14{text12]@3.15[textlc]plus 
100 @3,16[text14]@3,17[text15]@3,18[text16]@3, 19[text17]@3,20[text18]pius 
110 @3,22[category]@30,22[type] 


120 endreport:display:menu:plen:tlen:rem ends report and resets parameters 


Parsec has a few sets left of the Transactor micro- 
fiche for $10 a package plus $3 S&H. Each package 
contains between 10-18 pieces of fiche with no dup-~ 
licates. They run from Vol 4 tc Vol 8. These are 
old, dusty, etc. though we cleaned some of them and 
threw out the ones that did not look readable or 
were scratched in vital places. These are in at 
least fair shape. come ‘as is and we wili not 


; ; break open packages to look tor certain issues. For 
5 rem copyrighted commercial software from TC-128/64 #34 by parsec inc. e - : 


10 rem SELECTRECIPE.P 
20 rem This program will print SELECTED recipes - One or more 


<$1.00 an issue this is a bargain Order early and 

get the packages with the most tiche in them. I do 
; not have to stress this really is a LAST chance 

30 rem To print two or more of the same recipe enter the [name! two or more 

; a: offer :) Limit two per customer. You know Parsec’s 

times on the memo list. Limit of 22 cards. If more run pgm again. 

address ... get going! 

40 rem Press Fi,STOP at end of list 6 S 8 


50 maintaino'sU:h8recipelist":rem Removes the old h8recipelist 
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LEARNING MACHINE LANGUAGE 
ParT 1 


BY CRAIG T TAYLOR 


INTRODUCTION 

This column is intended for readers who wish to learn 
Machine Language (ML) and who have a rudimentary 
knowledge of programming. Knowing how to write 
Commodore Basic programs, for an example. Each column 
will progress farther and farther into the "guts" of 
the machine by explaining various programming tricks. 
various programming methods and stvles, and will also 
examine a lot of the "inner" routines that are known 
but not properly documented anvwhere. 


A full listing of the 6502 operational codes and kernal 
routines wculd take far too much space to give them the 
full treatment that they deserve. However. in the 
References sections are notes on which books. 
magazines, and software that document them in detail. 
It will help if vou have such a reference bv vour side 
while reading through this article. 


A. ~ U-64 MEMORY 


1. RAM 

The Commodore 64 has 64 kilobvtes ‘64K) of memorv. 
hence the name C-64, and that 64k of RAM (random access 
memory) maps in from location VU to 65535. RAM means 
that values can be stored in a location and retrieved 
intact. as long as the power does not go off. and that 
they can be used over and over again. 


Z. ROM 

However. the computer has to know what to do upon 
initial power-up so there exists a special piece of 
memorv called ROM. which stands for Read Onlv Memorv 
In the commodore 54 ROM there is also a section of 
memory called the KERNAL. which is a set of basic 
low-level routines needed bv most machine language 
programs, and the BASIC interpreter. The ROM appears 
to “overlav" RAM in that the ROM value is returned 
whenever a memory location is read. ROM occupies 
locations 40960 to 49151 :the BASIC interpreter) and 
from 57344 to 65535 :+the KERNAL). 


+. t C BLOCK 

vet the compute: jas to have some wav of communicating 
with the outside world. The 6502. the heart of the 
Commodore 64, treats Input/Output devices as memorv 
locations and reserves a 4k (4096 bvtes) block of 
memory for such 1/0 devices as the keyboard, sound chip 
(SID). and the video chip (VIC). as well as others. 

The I/O block occupies the range of 53248 to 57343 and 
also appears to "overlay" RAM. 


4. LAYERED SCHEME 

If we are overlaying the RAM and preventing access to 
it then why did Commodore add the extra RAM if it is 
not usable? It is - it is just not easy to use. There 
is a register located at memorv location #1 which 
allows the programmer to switch RAM in. I/O out. the 
KERNAL out, RAM in. etc. Doing this from basic usually 
causes programming problems. This register will be 
examined in more detail later. More information about 
it can be found in the book "Mapping the c-64" 
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B. The 6502/6510 CPU 


1. HISTORY 

Originally Commodore used the 6502 in the KIM-1. a 
hobby computer that first appeared in the 1970's. 
Once the "techness" of computers disappeared and it 

was recognized individuals did not have to be a rocket 
scientists to use them, more personal computers came to 
market such as the Commodore PET, and the Vic-20. 


The Vic-20 used a 6502 and much of the Commodore 64 is 
based on it. However, it had some severe shortcomings > 
such as limited memory space. 4k. of which onlv 3.5k 
was available. The Commodore 64 actually works using a 
6510 CPU. This 6510 CPU is 100% identical to the 6502 
except for using locations 0 and i for selecting 
certain internal data ports as input or output 
locations. This helps the Commodore 64 to manage its 
memory-"banking" scheme. Note that when I refer to the 
6502 below, I am also referring to the 6510. 


2. INSTRUCTIONS 


a. Data Storage and Retrieval 
The instructions. LDA, LDX, LDY. STA, STX, STY, TAX, 
TAY, TXA, TYA . | 


These instructions cover movement of data between the 
three registers of the 6502 and provide for transfer 
of numbers from the CPU registers to memory, from 
memory to registers, and movement of numbers from one 
register to another. 


b. Stack Operations 
Instructions: PHA, PHP. PLA, PLP, TSX. TXS 


These six instructions allow for saving the processor's 
accumulator :.A)}. the current processor flags, 
recalling the accumulator or the processor state and 
also allows for manipulation of the stack pointer. 


c. Arithmetic Operations 
Instructions: ADC, SBC 


The 6502 does not provide for anv multiplication 
instructions and any additions or subtraction without 
carrying must be handled by first setting the carry 
flag appropriately. Multiplication and Division and 
other operations other than addition and subtraction 
can be handled through a series of instructions. 


d. Increment Decrement Operations 
Instructions: DEC, DEX, DEY, INC, INX, INY 


These instructions will increment (increase by 1) or 
decrement (decrease by 1) a memory location or 
register. 


e. Shift Operations 
Instructions: ASL. LSR. ROL. ROR 


These instructions will shift the bits in the 
accumulator or memory to the right or to the left, with 
some taking into account the value of the carry flag, 
other instructions shift a O into a bit place. 


f. Logical Operations | 
Instructions: AND, BIT, CLC, CLD. CLI, CLV. CMP, CPX, 
CPY, EOR, ORA, SEC, SED, SEI 


These operations allow specific bits within the 
accumulator or memory to be tested, compared, set, 





reset. and toggled as well as setting flags within the 
processor. 


g. Branch Jump Operations 
Instructions: BCC. BCS, BEQ, BMI. BNE. BPL. BVC. BVS, 
JMP. JSR, RTI, RTS 


These instructions allow the program to branch to 
certain statements if a certain flag is set. Other 
instructions allow a branch to a subroutine. return 
from a subroutine, return from an interrupt-tvpe 
subroutine, and an unconditional jump to a memorv 
location. 


h. Miscellaneous 
Instructions Covered: BRK, NOP 


These two instructions are primarily used during 
debugging. BRK generates a "soft" - Interrupt request 
- usually dumping the program back to the machine 
language monitor. while NOP performs a "No-Operation" 
instruction and is usually used to overwrite. or to 
skip over, certain program instructions in memory. 


3. Special Treatment of Page O and Page 1 

A "page" in 6502 programming is defined as a group of 
256 bytes. So, memory location numbers U-255 would be 
a page, memory locations 256-511 would be another. etc. 


The 6502 has a special addressing mode called Zero-Page 
addressing which allows it to access memory in 
locations U-255 much faster. Hence, often used 
variables are stored here and space for other data is 
often very small. Only a few locations are available 
for use by the basic programmer, and a little bit more 
for the machine language programmer. 


Page 1 is where the "stack" is located. The stack is a 
group of memory locations from 256 to 511 where data 
can be stored temporarily and it helps keep track of 
where in memory to return to after calling a 
subroutine. Using this page of memorv is not 
recommended, although when using certain advanced 
techniques this can be done. For now, do not trv 
storing any values in these memory locations. 


4. Addressing Modes 

The 6502 is made even more powerful by its various 
addressing modes The .X and .Y registers often act as 
indexes into memory where data can be manipulated 
instead of using an absolute set location. All of the 
addressing modes available to the 6502 are listed 
below, with a brief explanation: 


a. implied Addressing Format: MNE 
The instructions in this addressing mode are ones like 
TAX, SEC etc. where no additional data is needed. 


b. Immediate Addressing Format: MNE $xx 
Typically these are the "load register with numerical 
value" instructions ‘ie: LDA #$xx). This addressing 
mode allows for an immediate value to follow the 
Mnemonic command. 


c. Absolute Addressing Format. MNE Sxxxx 

Direct reference to a memory location is made through 
this addressing mode. Note that the address in 6502 
instructions are usually stored low bvte, high bvte so 
the value $COOO would be stored as SOO SCO. 


d. Zero-Page Addressing Format: MNE $xx 
This is similar to Absolute Addressing except that 


locations in zero page are referenced and hence onlv 
one byte needs to be given instead of two. 


e. Relative Addressing Format. MNE <offset> 

This mode is used exclusively with the branch 
instructions and allows an offset of -128 bvtes to +12; 
from the base of the instruction. Most assemblers 
instead of making vou specifv the offset wil! caiculate 
it for you automatically if given a label name for the 
target address. 


f. Indexed Addressing 

Format: MNE $xxxx,<.x.v> 

This allows referencing of a memory offset bv the value 
in the .X or .Y register - allowing strings to be read 
one by one bv loading the value offset by .X. then 
incrementing the .X register for the next value. This 
mode is also used in a wide variety wavs - the address 


used is effectively Sxxxx + .X or $xxxx + Y 


g. Indexed Indirect Addressing Format. MNE (5xx,..x) 
This mode requires a zero page location and after 
getting the two byte values at $xx + .x it returns the 
value that is at that location. Example: 


Memory: $80 = $00 ScO $00 cl 


If .x = 0 then LDA ($80.x) would return the equivalent 
of LDA $c0O00O 


If .x = 2 then LDA ($80,x) would return the equivalent 
of LDA $cl100 


h. Indirect Indexed Addressing Format: MNE ($xx),.v 
This is similar to the above addressing mode except 
that it takes the two bytes $xx and $xx+l and then from 
that memorv address adds register .v to obtain the 
value. Assuming we have the same Memory values in $80 
as above then: 


If .y = 0 then LDA ($80),y would return the equivalent 
of LDA $c000 


If .y = 5 then LDA :($80),y would return the equivalent 
of LDA $c005 


5. Binary Numbers 

The computer's RAM Memory can be broken down into bvtes 
and then further broken down into the basic fundamental 
unit called a bit. Because computers are digital. each 
bit can have only one of two possible values: 0 or l. 
Within in the computer. instead of U and i's. we have 
either the presence of voltage or the absence of it. If 
we combine eight of these bits then we can form a byte. 
This byte can have any of 256 possible values (0 to 
255), by changing the values of the individual bits. 
Example: 


000000 00 in binary is VU in decimal 
00000001 in binary is 1 in decimal 
00000010 in binary is 2 in decimal 
00000011 in binary is 3 in decimal 
00000100 in binary is 4 in decimal 
00000101 in binary is 5 in decimal. 


— 


We can continue until we get the number 11111111 
in binary which is 255 in decimal How do we know that 
it is? Well, we could list out all the preceding 
numbers like above - but there is an easier way. If 
you place the values 128 64 32 16 8 4 2 1 above each 
position (note that each bit position within the byte 
is one half the numerical value of the previous bit 
position on the left) and then onlv add the values witn 


THE TC-128/64 NEWS #34 





THE VIpEO DIGITIZER 
A REVIEW 


By JOHN W. BROWN 


The Video Digitizer is a means of capturing images from 
various types of video sources such as video cameras. 
Video Cassette Recorders, and Camcorders. 


The Video Digitizer consists of one ROM sized cartridge 
that plugs into the User Port and three programs. 
Digison, Digifox, and Digimulti. It also comes with 
three gels to be used for capturing color pictures. 
which we will cover later in this article. Because we 
will be reviewing the Pagefox cartridge in detail in a 
later issue. 1 will only cover the features { find most 
exciting, unusual. or not offered by other programs. 


The first thing vou have to ask vourself before buving 
the Video Digitizer is if you need a video digitizer or 
if you need a handscanner. The video digitizers for 
the Commodore computers are generally cheaper than the 
HandyScanner 64, but both service a market segment 
where each excels. 


You can not beat the HandyScanner 64 for maximum 
resolution when reproducing a small photo or small 
printed work. such as line art. Then again. vou can 
not run a HandyScanner 64 over someone’s dog with 
pleasant results, though you can digitize the dog 
easily with the Video Digitizer. The HandyScanner does 
not produce color pictures which can be easily imported 
into the most popular paint programs for the C-64, the 
Video Digitizer does. 


If you are buying solely on price, you should consider 
the TOTAL cost of purchasing the Video Digitizer. You 
will need a camera and tripod, or a Camcorder and 
tripod. or a four head VCR with a steadv freeze frame. 
If you do not already own these items. the additional 
purchasing costs can far exceed the cost of the 
HandySecanner 64. 


Although the Video Digitizer says in the manual it will 
not work with freeze frames on VCRs. if I understand 
the manual correctly. it should work with the newer 
four head VCRs which produce a clear and steady video 
Signal. I know my Computer Eyes could never produce an 
acceptable scan from my (older) VCR’s freeze frame. 


The installation of the Video Digitizer is fairlv 
straight forward. With the power to the computer off. 
you plug the Video Digitizer cartridge into the User 
Port on the left hand side of vour Commodore 64,128. 
You load and run the first program on the disk. 
Digison, and you are ready to scan. For a more 
detailed explanation of how the scanning is done and 
how to set your svstem up, see the article at the end 
of the review. 


The program disk for the Video Digitizer is unprotected 
so you can make backup copies. Since the program can 
be run from any type of disk drive with anv device 
number, it is possible to put ali vour files on a 1581 
set as device #9 to take advantage of the increased 
storage space. It worked fine with mv CMD FD-4000 and 
CMD. HD. 


The cartridge has two adjustments. one for image width 
and one for contrast. There is no brightness control 
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knob. Brightness control is done through software. 
The threshold level for determining what pixel will be 
off (white) or on (black) can be set manually or done 
automatically by the computer. I could not figure out 
exactly what the "width" control knob did. All I can 
guess is that it it has something to do with the width 
of the video signal and plays no part in how wide the 
captured image will be. Turned all the wav down it 
hung the computer. The contrast knob is a something 
you only have to set once for your individual setup and 
once done it is to be left alone. Which is good 
because these knobs are actually recessed screws and 
are not easy to reach or adjust. especially on a 
C-128D. 


DIGISON 

Digison is the part of the package that produces the 
Black and White capture of images and converts well to 
other formats that use either HiRes mode such as Doodle 
and FGM. It also converts well to geoPaint. This is 
strictly a B&W paint program, though the work area is a 
big 640x400 pixel area. Using the program "Digifox" 
provided on the disk, the work area is 640x800 pixels 
with the addition of the Pagefox Desk Top Publishing 
cartridge. There are also some enhancements to the 
Pagefox software when using Digifox, such as being able 
to draw lines and circles wider than the screen and 
having the 24 pin drivers resident. 


One of the best things about the HandyScanner 64 and 
Pagefox are the full featured paint programs. that come 
with them. No disappointment here, the Video Digitizer 
has almost the exact same program. All three programs 
included with the HandyScanner 64, Pagefox, and Video 
Digitizer function the same way and for the most part, 
their menus are the same, except for a few minor 
changes. (see the menu pictures in red ink on page 45). 
The Video Digitizer program works with a C-1351 mouse ed 
in joystick port#0, a joystick in port#l, or the 
keyboard. As you can see from the menu pictures, menu 
one contains all the things you expect in a good paint 
program such as a small lined freehand, large line 
freehand, lines, rectangles, circles, a "fill" or paint 
feature for large areas, a really good "spray can", a 
means of moving large graphic objects, the ability to 
place text on the screen, "brush" and stamp utilities, 
a large eraser, a zoom mode, a tool for large scale 
reduction of a screen, and a x-y coordinate read out. 


This is a verv nice paint program that is smooth to use 
and easy to understand. Almost all the commands can 
also be called by one letter keyboard commands. One of 
the best features, which few programs can match, is the 
MOVE command. 


With the MOVE command, all vou do is click on the icon, 
go to the area of the screen you want to clip, click 
once to set the beginning corner of the MOVE box. click 
a second time to set the ending corner of the MOVE box, 
and a copy of the image will appear under your cursor 
in a few seconds. You are then free to move the image 
anywhere within the 640x400 pixel area and you can 
place it within anv 320x200 quadrant, using the mouse 
or joystick to position it. Once it is in place. you 
get to use the other excellent part of this tool, the 
"move one pixel" icon. By clicking on this icon 
immediately after depositing a MOVED graphic onto the 
page. you can scroll it left, right, up or down a pixel 
at a time. This makes lining up pieces of a graphic, a 
such as left and right halves. or tops and bottoms, a 

cinch. 





The "MOVE" command can also rotate or flip any image 
you are moving. How the image will be treated is 
determined by where the beginning and ending corners of 
the move window were set. Once you get the hang of 
this, the moving and flipping of images, it becomes 
very easy and natural and does not require the picking 
of multiple menu items to accomplish the task like 
other paint programs. 


The "MOVE" command also contains another handy feature. 
After setting one corner of the "move" box. if you hold 
the fire button after the second click, you can reduce 
the image! This is a fantastic feature for scaling 
something to fit within a small area. 


The "TEXT" function is good and allows the use of 
almost any Pagefox font to place nice looking text with 
your captured images. You can adjust the space between 
characters once the character set is loaded. Using the 
cursor keys you can flip a line of text in 90 degree 
increments. What I like best about this function is 
that the line of text does not get placed until you 
press the fire button. You so can type a line of text 
and move it about the screen for accurate placement. 
With other paint programs you have to hope you have the 
text started in the right position before you begin 
typing. Other paint programs, including geoPaint, do 
not offer the ability to rotate fonts easily. 


PATTERNS 

You can load and use any pattern you want or even 
capture them from a scanned picture. You can have a 
company logo as a pattern, you can use letters from a 
font as a pattern, you can use just about any image 
that will fit within the pixel confines of the pattern 
area. 


ADDITIONAL FEATURES 

There are other features, such as "file" and "plane" 
which help remove stray pixels and picture "noise" from 
a video scan. I found that using the zoom editor was 
the most effective feature for this and resulted in 
nicer looking pictures. On page 45 (the red ink) see 
the difference between my scanned picture as it was 
originally and how it looked after the background was 
eliminated and the image was flipped. 


DIGITIZING 

The Video Digitizer offers three types of Black and 
White digitizing. A simple B&W capture mode and two 
gray scale modes. Each digital capture lasts about 
eight seconds and has to be a picture of an unmoving 
object or has to be a steady unchanging video signal. 
The resulting scan is about 400*230 pixels and the 
image is placed starting in the middle of the first 
320x200 pixel screen. I found this kind of irksome at 
times because it makes aligning multiple images a bit 
tough when you want to piece together a very wide 

_ picture. 


With the gray scale - dithering modes vou can choose 
two dithering settings, either ’ levels or 13 levels of 
gray scale dithering. In each vou can set the 
threshold mark where white or black will be determined 
If you do not answer the prompt for the threshold 
setting it will be performed automatically bv the 
software, which usually gives superior results. 


PRINTOUTS 

To give you an idea of how good of a job the Video 
Digitizer does, compared to the hand scanner. I have 
included various captures and examples of what vou can 
accomplish. All the images on page 45 (the red one?) or 


page 46 (the blue one) were produced in one wav or 
another with the Digison, Digifox. or Digimulti 
programs. All the images were printed on the Epson 
Action Laser II using either the Hewlett Packard 
(Laserjet II) mode or using the Epson LQ 24 pin 
emulation mode, where noted. 


The Video Digitizer menus were grabbed with the Video 
Digitizer software and converted to geoPaint documents. 
The top picture of the tiger was HandyScanned and 
printed out under geoPaint at 150 dots per inch. The 
second picture of the tiger was captured using the 
Video Digitizer using a 7/7 level gray scale capture. 

The third picture of the tiger, the one at the bottom, 
was produced with a plain Black and White capture with 
a threshold setting of 9. The last two pictures of the 
tigers were printed at 100 D.P.1I. 


As you can see the HandyScanner 64 produces far 
superior results for smaller images you want to print 
unchanged at high resolutions. Although, for large 
objects that you want displayed on the screen or for 
images you want to include in your own programs, the 
Video Digitizer might be the wav to go. If you want to 
reproduce color images with color on screen, the Video 
Digitizer is the only way to go. The capturing of 
black and white art of "simple" images like silhouettes 
will yield roughly the same results on screen using 
either piece of hardware. 


On page 45 is a / level, gray scaled image, from the 
front of a Dr.Who magazine. Considering the wide range 
of colors. large image size to capture. and the glossy 
surface this came out excellent. I am only using the 
magazine as an example because I did not have anv wide 
color photographs to use instead. 


I have included my picture on page 45 as an example of 
how you can clean up an image and flip it. I removed 
the background by hand using the "sponge" and "zoom" 
modes. It took about 15 minutes. 


On page 46. the one with the blue ink. we come to some 
of the fun things you can easily do with the Video 
Digitizer that would be a chore with the HandyScanner 
because you would need printed images first. I have 
the Dr.Who figures from Dapol so I made an animated 
scene of a Dalek chasing and shooting a Cyberman in the 
back. Since the Cyberman has to come off his feet and 
I did not want to hang a wire, that would have to be 
edited out later. I opted for laying the models on 
their sides on top of a white sheet of 8xl4 paper. 
After each image was captured and saved to disk I moved 
the Cyberman’s arms and legs slightly. If you wanted 
to go all out you could draw in laser beams. shells, 
explosions. and even add sound in either C-64 or C-128 
mode with the programs provided in this issue! 

Animated this looks pretty cool! The images were 
printed at 150 dots per inch. 


As an EXAMPLE, the next image is of the Dr.Who Logo 
captured with Digimulti from the cover of the magazine. 
The first screen (top left) is the digital capture 
using the red gel in front of the camera lens 
(screen#l1). the top right corner (screen#2) is the 
digital capture using the green gel. and the lower left 


corner iscreen#3: is the capture using the blue gel. 


Screen #4, the lower right quadrant. is the result of 
all three screens being combined together. On screen 
this produces 4a color image, that with touching up, 
would be usable. You can save screen number four as a 
Koala file or you can save the whole graphic with all 
four screens for later use. My later use was to load 
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it into Digifox and print it out in B&W using the 24 
pin printer drivers, on our laser printer. A real 24 
pin printer would produce a better 2D picture. 


DIGIMULTI 

DigiMulti is probably the most unique and useful 
program on the disk and the best reason to buy the 
Video Digitizer instead of a scanner. It allows vou to 
have various levels of gray scale captures, which would 
be even more useful if color printer drivers were 
provided. 


The program produces color scans by capturing three 
color bitmaps red. green, blue, and then merging them 
together for the final color picture. 


First vou set to screen one, which is one of four 
screen areas. You hold the red gel in front of the 
camera lens and start the scan which takes about four 
seconds. Then you set to the second screen, hold the 
green gel in front of the lens and start the scan. 

When finished you start the third scan and hold the 
blue gel in front of the camera lens. Once all three 
color scans are done, you move to the four screen, hit 
the scan key, and the software combines all three color 
scans into one color picture. 


The color picture can then be saved to disk in many of 
the popular drawing program formats such as Koala and 
OCP Art Studio where you can further edit the program. 
You can also save the whole graphic area to disk and 
edit it in Digison. The graphic bitmaps convert fine 
to GEOS. There are various tools to balance the colors 
or to change the colors globally within the scanned 
picture. This is helpful if you want to change all the 
reds to blacks. all the blues to greens, etc. You can 
eliminate colors in the picture by changing it to an 
existing color. such as black, or "blend" a feature 
into the background by using the background's color. 


FILENAMES 

Besides providing information about about how to save 
the images in various picture formats. the manual also 
provides detailed information on how to name the files. 
To save a koala file with that "spade" character needed 
at the beginning of the filename, all you have to do is 
Start the filename with a question mark and the 
software does the rest. This eliminates having to have 
a separate program to rename the files later on. 


WHERE'S THE BEEF? 

I was left wondering "where’s the beef". There is no 
way, as far as I could tell, to use anything other than 
drive #8 and no way to send disk commands. This is a 
step backwards today. especially since Digison supports 
both. The most disappointing thing there are no 
COLOR printer drivers. If vou are going to capture 
color images which exceed the color resolution of the 
C-64. why not provide color printer drivers? A lot of 
people both in the US and overseas own color printers, 
especially the Star NX-1O0OR series. and the color 
inkjets have been popular for some time. Even software 
that used multiple color ribbons and multiple passes of 
the paper would have been fine. 


One idea that would be worth looking into would be to 
print all your color images out in a specific position 
on the paper, make multiple copies. and then run it 
through the printer again for the black text using your 
word processor or maybe even the Pagefox DTP cartridge. 
This would be great for cards. small newsletters. or 
labels. 
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I consider the lack of color printer arivers ana not 
being able to position and print out multiple copies of 
color images a serious oversight. 


TIPS 

Some of the things not readily available in the manual 
is the fact vou can scroll around the screen area 
(screens 1-4) with the cursor keys. You can also load 
graphics into the area you are viewing, even if it is 
not centered within a quadrant! This allows you to 
stagger images over each other for interesting effects. 


SCREEN SAVES SUPPORTED 

You are allowed to save a single screen, which is the 
last screen you viewed, or all the screens in the 
graphic area as one file for later use. These graphic 
formats are also supported and you would usually set to 
screen four that contains the final color image and 
then hit the save key. 


Hi-Eddi 

Cheese 

Koala Paint 
Paint Magic 
Blazing Paddles 
Vidcom 

Art Studio 
Doodle 


MANUAL 

The manual is a "dot matrix dox" and very hard to read 
or follow. The German manual has been translated from 
German to English and left at that. To be fair, I was 
suppose to redo the manual like I did for the 
Handyscanner 64 but just could not find the spare time. 
If you want to use the paint package I would suggest 
ordering the Handyscanner manual I wrote. The original 
masters were laser printed so you will not go blind 
reading it. The manual is $4.95 from RIO and will save 
you a lot of reading, frustration, and time. 


COMPARISONS 

I have used many devices for capturing video images on 
the C-64. The most widely known one I have used is 
Computer Eyes. In my opinion, the smaller hardware 
package of the Video Digitizer beats Computer Eyes 
hands down on graphic format support, features, 
software, easy of use, and results. 


So it earns a (weak) A- instead of a solid A due to the 
very poorly done manual that would have done in a 
lesser product and because of the lack of color printer 
drivers and other features for Digimulti. If you do 
need this product you will not regret the purchase and 
will enjoy it. 


Grade: A- 


Cost $149.95 Summer Special 
Reg. Price $249.95 
Six month warranty 


ITEMS USED 


VIDEO DIGITIZER - $149.95 
1-702-454-7700 

RIO Computers 

3310 Berwyck St 

Las Vegas NV 89121 





CAMERA - $250.00 

Panasonic WV-1410, Closed Circuit B&W Video - Security 

Camera. Available through various mail orders sources 

and computer dealers. I believe DAMARK and COMB use to 
carry such cameras. 


CAMERA TRIPOD - Cost $49.99 
Radio Shack 
Cat# 16-2017 RST-84V 


BNC-Phono Adapter (gold plated) - Cost $4.19 
Radio Shack 
Cat# 278-303a 


6 Foot Gold AV/Cable - Cost $5.69 
Male RCA to Male RCA 
Cat# 15-1519 


VripeEo CAMERA SETUP 


By JOHN W. BROWN 


Make sure you have a well lit and clean place to work. 
The area needed bv the tripod will be 18 inches wide bv 
29 inches long. I set my camera and tripod on the left 
hand side of the computer so I could use a short video 
cable. 


First, take the camera tripod out of the box. Notice 
the various tags on the knobs which control the camera 
angles and platform height. Now remove them. We are 
going to leave the tripod at its lowest height for our 
work. The hook at the bottom is for storing and 
hanging the tripod up when it is not in use. Next 
spread the legs out and push downward until the support 
arms for the legs lock in place and the center ring is 
seated down firmly as far as it can go. The level, the 
piece of glass with a bubble floating in it, should be 
on the left hand side of the tripod mount. If not, 
turn the tripod head around. 


On the very top of the tripod there is a platform where 
the camera will be mounted. It is the part with the 
rubber pad and two metal studs sticking out of it. 
Remove it bv pressing on the lever near the rounded 
edge, it is spring loaded so you have to hold the lever 
while lifting up the small platform. Now take your 
camera out of the box and flip it over. 


Lift the C-ring on the underside of the platform pad 
you removed and screw it into the threaded hole 
provided on the bottom of the camera. The small stud, 
the one without the threads, will face towards the 
front of the camera and is inserted into the hole 
provided. Firmly with two fingers tighten the C-ring - 
. screw assembly as tight as you can (if you are a weight 
lifter use vour thumb and baby finger .). Push the 
ring down so it is laying flat on top of the screw 
assemblv 


Make sure ail the control knobs om the tripod are 
firmly turned. You are going to put a heavv camera 
onto it and you do not want it to move or flop around. 


Now mount the camera on the platform bv placing the 
mounting pad on the top of the tripod and moving the 
lever to the side. Once mounted. move the lever under 
the platform, back into its original position It will 
move by itself. it is spring loaded. But. make sure 





the lever is in place by firmly pressing on the lever. 
but do not force it. 


Now remove the BNC connector and cable from the 
packages. Place the BNC connector on the camera bv 
lining up the slot and pushing forward. while turning 
it. Uncoil the cable and plug it into the back of the 


camera. 


Now turn the camera around by loosening the second knob 
from the near the middle of the tripod. When the 
camera lens is facing forward, towards the front of the 
computer, tighten the knob. When turning the camera 
make sure the cable and power cord do not become 
entangled or hit a connector port on the back of the 


computer. 


Now angle the camera down until it is in a 90 degree 
angle towards the desk. The lens wili be facing 
directly at the desk top. 


With the electrical power and computer off. plug the 
Video Digitizer cartridge into the User port on the 
left hand side your your computer. Now plug the other 
free end of the RCA cable attached to the camera into 
the Video Digitizer cartridge (V.D.C.). Since the 
cartridge does not sit level on the desk, you might 
want to plug the cable into the Video Digitizer before 
inserting it into the computer. This might save some 
wear and tear on the Video Digitizer and your User 
port. C-128D owners might have a tough time doing this 
since the RCA plug is almost directly underneath the 
C-128D power cord. Now turn the computer system on and 


enter C-64 mode. 


Now turn the camera and your light 


source on. I used a small table lamp to provide 
indirect lighting, you could also use a light table. 


(DR. OCTAL TIPS CONTINUED FROM PAGE 48 ' 


column screen is 
When vou want to 
press the C= kev 
mode, once there 
the reset button 
mode . 


Tip &0015 


filled with garbage The solution: 
use the reset button to exit GEQS. 

and the reset button to enter ¢-64 
type Poke 996.96 <RETURN> Then press 
again to return to a normal C-128 


USING CP/M and the CMD HD 
From: John W. Brown 
Though it is stated in the manual. manv people forget 


to ALWAYS create 


"1581C" partitions for UP M mode on 


their hard drives. This is easv to forget im the 
middle of a gut wrenching low level format or if vou 
have not read the manual . - D 


Tip &0016 


USING CP/M and the CMD HD 
From: John W. Brown 
Always have your boot or menu program sent the (épv 


command over the 


serial bus to turn off the Ramlink s 


fast parallel access before running vP M It wil: save 
you some typing and it will also save vou from having 

to reset the computer, when the drive locks up, if vou 
forget. 
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a one in their bit location then 11010110 would be: 214 


128 64 32 168 4 2 1 
110310 1 21 =0 
in binarv = 128+64+16+4+2 = 214 in decimal. 


Binary numbers are used in Machine Language programming 
quite often. The classic rotate and add algorithm that 
is usuallv implemented for multiplication requires a 
good knowledge of how bits and bytes relate to values. 


6. Hexadecimal Numbers 

While binarv numbers could onlv hold the values J and 
1. hexadecimal numbers can hold the numbers 0-9. LO. 
11. 12, 13, 14. and 15 in each digit. Instead of using 
"10" "Li" "12" etc... we use the letters A Bc D E and 
F to stand for 10, ll. 12. 13. 14 and 15. So we can 
count in hexadecimal (also called "hex") by: 


QO O 10 A 20 14 
1 ot ll B 21 15 
2 2 Lz: £ 22 16 
3. 3 LS. 'D 23. Ae 
4 4 lao &E 24 18 
5 5 15: oF 25 1? 
6 6 16 10 26 1A 
& 32 1; ll 2: IB 
8 8 18 12 28 Lc 
9 9 £o.4:3.° ZO. 1D 


But given the number $C134 how do we find the decimal 
value?? Note the dollar sign $ in front of the number. 
the $ sign is usuallv usea to denote a number is 
hexadecimal as $1000 can also be a number but is not 


the same as 1OOO. 


We do it in the same manner that we did with Binarv 
numbers except with some different values. 


7 


(Just think 16 to the 3rd, to the énd....} 


x4096 x256 x16 xl 
SC 1 | 4 


where C = 12 so we get 12x4096 + 1x256 + 3x16 + 4xl = 
49460. 


Hex numbers are used to represent memorv locations 
frequently in machine language. Because of their 
compact format they make values easier to remember and 
use instead of a 3 digit decimal number. 


GC. C=64 Kernal Routines 


1. Their purpose and use 

When Commodore introduced the PET series. long before 
the Vic-20 and Commodore 64 and 128. thev set in the 
highest memory locations a series of jumps (tables) to 
other routines so the programmers did not need to 
bother checking if any revisions had been made within 
the ROM’s memory locations. Thev were assured that the 
address (index) thev were jumping to. would indeed. be 
the address to do that specific function in machine 
language. The KERNAL handles such low-level chores as 
serial devices. screen, scanning the keyboard, updating 
and reading the system clock, etc.. 


2. Common Kernal Routines Used and What 
Thev Are 


Some of the more common and often used Kernal routines 


with a short description are listed below: 


READSS SFFB/ 
Registers In 
Registers Out 

SETLFS SFFBA 
Registers In 
Registers Out 

SETNAM SFFBD 


Registers In 


Registers Out 
Note 


OPEN SFFCO 


Registers In 
Registers Out 


CLOSE S$SFFC3 
Registers In 
Registers Out 


CHKIN S$FFC6 
Registers In 
Registers Out 


CHKOUT S$FFC9 
Registers In 
Registers Out 


CLRCH $FFCC 


Registers In 
Registers Out 


BASIN $FFCF 


Registers In 
Registers Out 


BSOUT aka 
CHROUT $FFD2 
Registers In 
Registers Out 


Return I/O status byte. 
None. 
.A = status byte. 


Set logical file #. device #. 
secondary # for I/O. 
.A = logical file #,. .X = device #, .Y 
= secondary # 

None. 


Sets pointer to filename in 
preparation for OPEN. 

.A = string length, .XY = string 
address. 


- None. 


To specify no filename specify a 
length of QO. 


Open up file that has been setup 
by SETNAM, SETLFS 

None. 

.A = error code, .X,.Y destroyed. 
.C = 1 if error. 


Close a logical file. 

.A = logical file #. 

.A = error code. X. Y destroved 
.C = 1 if error 


Sets input channel. 

.X = logical file #. 

.A = error code, .X,.Y destroyed. 
.C = 1 if error 


Sets output channel. 

.X = logical file #. 

.A = error code. .X, Y destroyed. 
.C = 1 if error 


Restore default input and output 
channels. 

None. 

A, .& used. 


- Read character from current input 


channel. 


Cassette - Returned one character a 
time from cassette buffer. 

Rs-232 - Return one character at a 
time, waiting until 
character is ready. 


Serial - Returned one character at 
time, waiting if nessc. 

Screen - Read from current cursor 
position. 


Keyboard - Read characters as a string 
and then return them 
individually upon each call 
until all characters have 
been passed ($Q0d is the 
EOL) . 

None. 

A = character or error code, .C = l 

if error. 


Output byte to current channel 
.A = Byte 
_C = 1 if ERROR (examine READST) 
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LOAD SFFD5 Loads file into memory (setup via 
SETLFS ,SETNAM).. 

.A = 0 - Load. Non-0 = Verify 

.XY = load address (if secondarv 
address = QO) 

.A = error code .C = 1 if error. 


XY = ending address 


Registers In 


Registers Out 


SAVE SFFD8 - Save section of memory to a file. 

Registers In : .A = Z-page ptr to start address 
.XY = end address 

Registers Out : .A = error code. .C = 1 if error. 
.XY = used. 


GETIN SFFE4 Read buffered data from file. 
Keyboard - Read from keyboard buffer, 


else return null ($00). 


RS -232 - Read from RS-232 buffer, 
else null is returned. 
Serial - See BASIN 
Cassette - See BASIN 
Screen - See BASIN 
Registers In : None. 
Registers Out : .A = character, .C = 1 if error. 
.XY = used. 
PLOT SFFFO - Read or set cursor position. 
Registers In :. .C = 1 (Read) .C = 0 (Set) 
.X = Col None. 
_.Y = Row 
Registers Out : .C = 1 (Read) .C = 0 (Set) 
xX Current Col None. 
.Y = Current Row 
D. Sample Program 
1. Notes. 


This sample program will simulate a bouncing ball on 
the screen. It starts out by first clearing the 

screen, setting the position and direction of the 

ball, and then performing an endless loop which 
consists of drawing the character (a lowercase "0") 

and then pausing briefly and erasing it by displaying 
a space at that location. The position is then updated 
and the keyboard is checked to see if the "Q" kev was 
pressed. If it was not then the loop continues. 


I chose this sample program instead of the typical ones 
that display a name over and over because this 
demonstrates the length and detail to which machine 
language has to be planned out. It also does something 
a little bit more entertaining .: - ) The text on the 
right side after the semi-colons are comments. Almost 
all assemblers will let you insert comments into the 
source code on what the instructions are doing, notes 
to yourself. and so on, if you put a semi-colon after 
the instruction or on a blank line. I have used these 
comments to describe what we are doing. 


A careful reading of this program, typing it in, and 
changing one thing at a time will help vou to 
understand Machine Language better. 
you make changes, What should it do? 
Why did it or why did it not do that? 


Ask vourself when 
What did it do? 
2. The Program "ballbounce" 


In C-64 mode type load"ballbounce.bin".8.1 
sys 49152 


In C-128 mode type bload"ballbounce8 .bin" 
sys 4864 





The C-128 version works on either the 40 or 80 column 
screen. 


PROGRAM NAME:ballbounce.src 


ad 
ap 
pe 
jm 
ah 
ld 
ea 
gn 
fa 
be 


P& 
jf 


kf 


kd 
ho 
ln 
ne 
lf 
mm 
ih 
op 
co 
ad 
of 
ad 
dc 
roi 
kk 
ea 
dn 
Lo 
gh 
1a 
he 
mb 
mp 
dd 
rome 
ce 
dc 
di 
hn 
bb 
ga 
dh 
Jp 
ai 
hk 
in 
nn 
fn 
ei 
la 
fj 
ga 
mn 
op 
in 
ie 
hh 
nh 
bd 
JJ 


1010 : filename = ballbounce.src 


1020 : ballbounce rawplayer is commercial software from 
1030 : twin cities 128/64 issue #34 by: 

1040 ; parsec inc po box ill salem ma 01970-0111 usa 
1050 : copyright 1993 - all rights reserved 


1080 : this program is intended to show an example of 


1090 - some of the addressing and kernal routines for 


1100 - the commodore 64 and the 6592 processor. 


1110 

1120 * = Sc000;indicates to the assembler to make a file 
1130 : with a starting starting address of 49152 
1140 : ($c000), on the c-128 use 4864 (51300) 
1150 


1160 : since we are going to be using the kernal 


1170 : routines by name in this program we will have to 


1180 : tell the assembler where in memory the routines 


1190 : are Located 
1200 : 
1210 plot = Sfff0; 


1230 bsout = Sffd2; 
1240 
1250 getin = Sffe4; 


1260 ; 

1270 jmp start; 

1280 ; 

1290 xpos .byte S00; 
1300 ypos .byte S00 
1310 xinc .byte S00; 
1320 yine .byte S00; 


1340 start lda #147: 


1360 jsr bsout; 
1370 lda #501; 
1380 sta xpos 
1390 sta ypos 
14U0 sta Xinc; 
1410 

1420 sta yinc: 
1430 

1440 ; 

1450 

1460 ; 

1470 doplot ldy xpos; 


1480 lLdx ypos; 
1490 cle; 


1510 jsr plot: 
1520 Ilda #"o"; 
1530 jsr bsout 


1600 ldx #512; 
1610 ; 
1620 ldy #500; 
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display character .a at current 
cursor position 

return key pressed in .a 
skip ahead, over variable storage 


holds current .x, .y position 


x increment-value of 1=+1,0=-1 


y increment-value of 1 = +1,0=-1 


here we start the program by 
clearing the screen 
by displaying chr$(147) 


and then reset the position to 1,1 


since .a = 1 we’re are going to 
also use it to set the x 

and y increment to both +1 - ie: 
down & to the right 

now we can draw the character on 
the screen after setting the 


cursor position. 


.y = xpos 
.X = ypos 
.c = 0 indicates we want to set 


instead of read 
the cursor position 


display a lower case oh 


now we need to dispiay so that it 
will be visible. we de this by 
setting the .x and .y registers in 
a nested loop and repeatdly 


decrease them. 


_x =S12 -main speed controi-found 
by experimenting 


-y = S00 -note that. first dey wili 





J& 
J8 


ne 
bh 
om 
kn 
of 
ml 


lh 
oa 
em 
cb 
jd 
hh 
ki 
nh 
jd 
hn 
gi 
cg 
ij 
db 
gm 
te 
og 
ab 
ad 


Le 
ne 
co 
im 
he 
og 
eb 
he 
lh 


ka 
cd 


eg 


eh 
gd 
2 
bl 


li 
km 
gb 
Kj 
gl 
ea 
00 
iJ 
ma 
bb 


oi 


CJ 
pl 
ij 
mf 
ec 
pl 
ob 
bk 
ja 
gb 
gl 
ki 


1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
194U 
1956 
196U 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
218U 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 


THE TC-128/64 NEWS #34 


; make .y = Sff 

loop dey; decrease .y by 1 

bne loop; and use the implicit comparsion 

: with 0 to branch back 

dex; decrease .x by 1 after y = 0 

bne Loop; if .x is also not equal to 0 then 


jump back, repeat. 


: note that we don’t need to reset 


-y to 0 after we decrease .x as 


. we've already established it is 0 
; because of the implicit comparison 
: in the lst bne. 

doerase ldy xpos;move cursor back to erase 

ldx ypos; load registers .x, .y 

cle 

jsr plot 

lda #" °: and display a space to erase 

jsr bsout 


now we need to update the posit- 
ions by loading .a with xine or 
yince to get an implicit comparsion 
during the lda (almost similair to 
an automatic cmp #S00 after each 
lda). note that dex and inx also 
perform this implicit comparison. 
it’s technically not a “true” 
comparison but the beq and bne 


flags are valid. 


update ldy xpos; get positions 

ldx ypos 

lda xinc; if xincrement 

beq xminus; is 0 then jump ahead 

iny; else increase .y 

cpy #39: check to see if equal to 39 - max 
col of the screen 

bne updatey; if it isn’t then go update the y 
position 

lda #S0U: else change xincrement 

sta xinc; for next time.... 

beq updatey: use that implicit comparison to 
jump ahead 

xminus dey; the dey also does an impiicit 

: comparison to S00 

bne updatey:; so if it’s non-zero then skip ahead, 

lda #801; else reset the xincrement for 

sta xinc; next time. and we can fall through 
to updatey. 


updatey lda yinc:if yincrement is 


beq yminus: Q then jmp ahead 

1nx: else increase .x 

cpx #23- comparse with maximum row # 

bne setpos: else store the new positions - 
finished updating them 

lda #S00; else change yincrement 

sta yinc: for next time... 

beq setpos; use the implicit comparison to 

: jump ahead 

yminus dex: the dex also does an implicit 
comparison to S00 

bne setpos: so if it’s non-zero then skir ahead 

lda #8501: else reset the increment for 

sta yinc: next time. and we can fall 


through to setpos 
setpos sty xpos: set new x position 


Sstx ypos; set new y position 


mow we can check to see if the 


oo 2360 ; "Q" key is pressed and if it is 
ce 2370 : not we can go back and repeat ali 
dh 2380 ; these instructions. if it is, we 
gh 2390 ; will clear the screen 

kp 2400 ; and rts - return back to basic. 
ko 2410 ; 

be 2420 getkey jsr getin;call kernal routine to get a 

nb 2430 : character 


kp 2440 cmp #"Q"; 
nj 2450 beq exit; 
ji 2460 cmp #'"q": 
ek 2470 beq exit; 


if it’s an uppercase "Q" 
jump ahead to exit. 


else compare to a lowercase ' 


ll 2480 ; to exit. 

ka 2490 jmp doplot;: else failing both of those, 

nl 2500 ; back and replot.... 

fg 2510 ; here at exit we just clear the 
eh 2520 ; screen and rts. 

cg 2530 ; 

ap 2540 exit lda #147; code for clearing the screen 


mo 2550 jsr bsout;: 
fi 2560 rts; 
ec 2570 .end 


display it. 


and return to basic. 


E. REFERENCES / RESOURCES / TOOLS 
1. Books 


6502 Software Design by Leo J. Scanlon 
Indianapolis. Indiana 
Howard W.Sams, 1980. 


6502 Assembly Language Subroutines 
Lance Leventhal and Winthrop Saville 
Berkeley, California 

Osborne/McGraw Hill, 1982 


Commodore Business Machines. 
Commodore 128 Programmer’s Reference Guide 
New York: Bantam, 1986 


Mapping The Commodore 128 by Ottis R. Cowper 
Greensboro, NC 


Compute! Publications, 1986. 


Mapping The Commodore 64 & 64C 
Sheldon Leemon 
Greensboro, NC: 


Compute! Publications, 1987 
2. SOFTWARE - PUBLIC DOMAIN ; SHAREWARE 


Those of you on Genie can check the following files 
(among the many others available) 

file# Program Name Description 
10329 SAL.SDA 


8794 LEARN-ML.SFX 
7109 CYCLE CHART 


C64 assembler 

machine language tutor 

Chart of 6502 opcodes; 

clock cycles 

5336 MEGAMON.SDA Excellent Machine 

Language Monitor 

4818 PD PAL COMPAT. ASSEMBLER Compile your PAL files 
with this! 

3297 ML/HEX/BIN CHART Prints a 5 vage 
conversion aid 

3081 EA.DOC Documentation for EA. 

3080 EA An intergrated Editor 
/Assembler 

5417 C128 MEMORY MAP memory map by Jim 


Butterfield 








and if it’s that, then jump ahead 





advertisement *aadvertisement*advertisement* advy 


a e 
4 TWIN CITIES 128/64 

; THE COLOR 64 BBS SYSTEM ; 

e i 

xr Color 64 is a BBS program that has been around for 7 years, and in those years, s SUBSCRIPTION 

ie more and more people have realized that Color 64 is one of the most unique BBS € INFORMATION 

i systems available for the Commodore 64. Color 64’s greatest feature is that it m 

Ss is completely modifyable. Beginning Sysops can modify the system by running the e TWIN CITIES 128/64 = 

e easy-to-use Setup program. Advanced Sysops can modify the very programming of n 

m Color 64 itself, because changing Color 64 is as easy as editing a BASIC t Cost for Six issues sent by 3rd 
7 sroeran: : Class Mail - USA ONLY! 

n a 

t You won’t have to do everything for your BBS program, though, because Color 64 d $24 -00 - TC128/64 magazine only 
* is packed full of features that make it easy to install and maintain. The latest Vv 940 -00 - TC128/64 magazine & disk 
a version of Color 64, version 8.00, supports: standard modem interface up to 2400 e 

d bps; SwiftLink RS-232 interface for modem rates up to 38,400 bps (SwiftLink is a r 

Vv Creative Micro Designs product); use of any 100% Hayes compatible modem and most t TWIN CITI ES 128/64 _ 

e modems that support Hayes ’AT’ commands; use of almost any Commodore compatible i 

r disk device (1541, 1581, 1571, CMD FD series, CMD HD, Lt. Kernal HD, ICT HD, s Cost for six issues sent by list 
t IEEE drives, and more); use of the 1750 and 1764 REU’s, expanded up to 2 é Class Mail for the USA or Air 

i megabytes; use of CMD’s RamLink and RamDrive; use of some fastloader systems, m Surface mail for Canada, Mexico, 
s such as the Skyles Flash! 1541 Interface. At least 2000 blocks or more of e and other countries. 

e minimum disk space is recommended. Color 64 is a very disk intensive system, so n 

m it is HIGHLY recommended that your system have fast disk access, whether you use t Overseas delivery now takes only 
e a Hard Drive, RAM expander, or a speed enhancer like JiffyDos (a CMD product). * 7-14 days to deliver the issue 

¥ s into YOUR country's mail system. 
t Color 64 also supports: up to 26 upload and download directories with download d 

* descriptions; both Punter and Xmodem download protocols, with multi-punter Vv $31 200. = TC128/64 magazine only 
a transfers; a public message system, with up to 20+ categories, with full subject e $48 00 - TC128/64 magazine & disk 
d chaining; a fully featured message editor with built in MCI commands for message r 

Vv formatting; 40 and 80 column support; an automatic page-pauser function for long t 

e messages; Commodore graphics and color; ANSI graphics and color; ASCII text a LABEL INFORMATION 

r conversion; built in networking, with networked mail, public messages, and file s 

t transfers. e Line #1 User ID, last issue, subscription type 

i m Subscription type #1 = magazine 3rd class w/o disk 
s Color 64 has scores of public domain online-games and modules, all of which are e Subscription type #2 = magazine 3rd class w’ disk 

e accessible on our support BBS, and can be installed easily even by a novice n Subscription type #3 = magazine lst class w/o disk 

m Sysop. Included in the package are some games that have been specially designed t Subscription type #4 = magazine lst class wy; disk 

e to run with Color 64 v8. As you learn more about your BBS system, you can even * Line #2 = name Line #3 = street address 

n write your own games and modules, which you can then share with all of the many a Line #4 = City, State, Zipcode 

t other Color 64 Sysops. This system of free access to games and modules is one d Line #5 = optional, used to list countries 

bad of the things that make Color 64 unique among other BBS systems, some of which Vv 

a ask money for their extra modules. e Payment can be by check or money order. ALL PAYMENTS 
d r MUST BE IN US FUNDS! Overseas customers can usuallv 
Vv This leads to perhaps the best feature of all -- Color 64 is sold as a complete £ get a money order in US funds at a Post Office or 

e package. This means that you get the programs (meaning you get the source code i Citibank location. Sorry we do not take credit cards 
r too), built in networking capability, all of the necessary support files, the Ss 

+ games and modules, installation and operating instructions, and a technical and e TC-128/64 COMPANION DISKS 

i programming reference guide. Other BBS systems may require an additional fee m Our companion disks not only save you time typing but 
s for networking, source code, games, or even programming information, but these the disks come with at least one ‘value™ program 

e are included free of charge in the Color 64 BBS system. Also, any future version written just for TC-128/64 that makes the disk worth 
m 8 updates (8.01 to 8.99) will be provided free of charge to current version 8 the price! 

e owners, and can be obtained by downloading the updates/fixes from the Support * 

n BBS or via U.S. mail (fee charged for diskettes and postage). a if at any time you are not happy with the magazine or 
t d disk, you can be given a credit for the remaining 

* More information about Color 64 BBS V8.00 can be obtained by contacting the Vv issues to be used towards purchases made from our 

a Sysop of Sonic Temple BBS (Fred Ogle, AKA Betelgeuse, user #2) -- 1200/2400 bps, e catalog, which contains items ranging from 51-$300. 
d > phone number (410) 285-0428, set terminal to 8-N-1. Or you can send GEnie mail r 

v to F.OGLE, or Inet/Usenet mail to F.Ogle@geis.com Pricing: For Color 64 version t Make checks payable to "Parsec, Inc.” 

e 8.00, a 4 disk set with documentation, the cost is $65.00: to upgrade from Color a 

r 64 v7.XX to v8.00. the cost is $25.00: There is a 20% discount with a trade in Ss 

t of another BBS program -- This offer is limited to certain BBS programs, so you e Mail your payment to: 

i must contact Fred Ogle to confirm a trade-in PRIOR to ordering. Send orders to: m 

s Fred Ogle, P.O. Box 35427, Dundalk, MD 21222-7427 e PARSEC, INC. 

: n PO BOX 111 

m Postage/Handling Charges: US Mail 3rd Class (ground), add $2.00: US Mail ist t SALEM MA 01970-0111 

e Class (Air), add $3.00; Priority Mail (2nd Day), add S4.00: Express mail (Next * USA 

n Day), add $15.00. Check or money orders accepted -- $50.00 charge for returned a 

t checks. U.S. funds only. Canadian orders add $5.00. Prices and features d 

* listed are as of 8/3/1993, and are subject to change. Vv 

a e 
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aoae ©SOSTSERVICE TECH SUBPCAT - 
RIO 800-782- 91 1 0 one AUTOMATIC VOICE,FAX SWITCH 
ONLY 702-454-7700 


VIDEOFOX VIDEO DIGITIZER 


a e C A eC CC 
The Tvol For Creative Video Buffs Digitize black and white or color pictures 























ny US i on ay 


smi rachis Mactir 


THE FUN GRAPHICS Ht (FGM) 1S AN “ALL-IN-ONE” GRAPHICS 


M Divitize any video source including VCR 


Generate video Utles. opening credits, window mele gine either 4.7 or 13 level urey levels 
nthe oe hee g ee ee f ; 5b ae ae ‘nu controled picture brig shines 
adverusing. animation or other small trick movies Be Includes three independent software programs 


MAt of these exciting effects are ure easy and tun vou todo with 


for total control and editing of digitized images: 
our new Videolos software 


DIGISON ~ VIDEOFOX ~ DIGIMULTI 





Over a dozen special effects such as scrolling, comoimng, winshield - @ Free color filters included tor digitizing color 
PROGRAN FOR THE C64 THAT TAKES OVER WHERE PRINT SHOP AND na eee te ‘a minluconinaddeateauunanns 2 grass: trom black and white cameras e . 
OT HER GRAPHICS PROGRAMS LEAVE OFF, WHAT | YOU CAN 00 WI TH a Independent adjustment of foreground and background colors “3 Snel See Seca, cose ior ede 
FGOM IS LIMITED ONLY BY VOUR IMAGINATION, HND FOM CAN EVEN M Pave thpping in real ume for pertect animation sequences 4 Wess \ transter of pictures into Pagetox 





HELP YOU STIMULATE THAT, FOLLOWING ARE JUST A FEW OF THE | 

THINGS THAT FGM CAN BE USED 10 00: ONLY $59.95 
ap BUSINESS CARDS SIGNS 
aac oa CUSTOM LABELS CHECKS 

SUPPORTS | NEWSLETTERS OVERLAYS DRIVES MOST 
ALL = hs «VIDEO TITLING BROCHURES #PRINTERS 0c) 
2 CMO DRIVES CALENDARS LETTERHEAD 
AND RAMLINK | DIAGRAMS CERTIFICATES | IN GRAPHICS 
POSTERS GREETING CARDS 
bad) © FORMS DISK ENVELOPES 
THE FUN GRAPHICS MACHINE SUPPORTS IMPORTING GRAPHICS AND 


‘ \ 
— 1 ONLY SPOS 5° 


HANDYSCANNER 64 


The Worlds First Handscanner for the 64! 

® Professional quality super high 400 dots per inch resolution ~ Reads the graphics from any printed document 

@ Converts any material to digitized graphics in seconds ~ B/W setting for crisp reprodution ot high contrast line art 

@ Elaborate grey-tone scale digitizes color or black & white photos using 3 built in dithering settings Mn 
@ Enlarge or “reduce 300% to 33% ~ Graphic memory ot 640 X 400 standard (640 X 800 with Pagetox module) 

Included software has all the standard tunctions of a good drawing program 


ONLY $299.95 








HI-RES SCREENS FROM MANY OTHER POPULAR GRAPHICS PROGRAMS. 3 Easy To Use Editors For Perfect 
ONCE IMPORTED, YOU HAVE FULL CONTROL TO MANIPULATE AND PAGEFOX Home Desktop Publishing 
PRINT THE SCREENS AND GRAPHICS, A FEW OF THE PROGRAMS YOU GRAPHIC EDITOR ~ TEXT EDITOR ~ LAYOUT EDITOR 
CAN bead FILES FROM ARE: Bee ae module keeps entire page in memory 
KOALA pee ee ed Uses proportional mouse or joystick for total control over text. graphics or picture 
RUNPAINT COMPU ON Y $139. 
PRINT SHOP = PRINTMASTER =| THIS AD L ss 3 —, amie 





ANY OCP ART NEWSROOM CREATED 
DRIVES }  yinea BYTE It DOdOLE! wit FGM 
ANY GEOS SCREEN (INCLUDING GEOPAINT & GEOWRITE) MAY BE 
CAPTURED SIMPLY BY RESETTING THE COMPUTER AND LOADING FGM. 
HOTE: YOU 0G NOT NEEG ANY ADDITIONAL PROGRAMS TG USE FGM. 


THE FGM PACKAGE INCLUDES A 140 PRGE MANUAL, TUTORIAL, 
DOUBLE SIDED PROGRAM DISK, AND DEMO TUTORIALS------ $24.95 


ACTION REPLAY v 5.0 


THE ULTIMATE UTILITY/BACKUP CARTRIDGE FOR THE C64/128 


Allows You To Freeze The Action Of Any Memory Resident Program And Make A Complete Backup To Disk 


WARP 25 - The worlds fastest disk serial Turbo MORE UNIQUE FEATURES - Menu driven operation 

@ Typical backup will reload in under 5 seconds @ Simple operation: Just press a button at any point 

M@ No special formats-save directly into Warp mode Ml All backups reload WITHOUT cartridge at Warp speed 

@ Warp Save/Load available straight trom BASIC — Ml Sprite killer: Make yourself invincible-disable collisions 
RAMLOADER - Loads most commercial originals Ml Freeze HiRez screen & save in Koala & Paddles format 








ti ( ome | [ | t_ UNIQUE CODE CRACKER MONITOR MILO compatible with ALL drives and computers 
FUN GRAPHICS MACHINE FULL KEYBORRD OVERLAY -- ~~ $3.50 ena Va 
eR LTA a ed ide ey Ay ate ie | MIDI 64 -Only $49.99 ADV. MUSIC SYSTEM MAKE THE MOST OF YOUR 
oF THE FGM COMMANDS. AN OVERLAY CAN GREATLY MIDI 64 -Only $49.99 ADV. ! Mo} ee 
FGM LEARNING CURVE. PLEASE SPECIFY WHICH COMPUTER THE SIGN a MIT Ow = MID een npead ping out mast ACTION REPLAY 
Works wi a ra Vv uSIC Ss | avdae ru internal sound or extern 
QUVERLAY 1S FOR (C64, £128, SX-64) UR CO4 WILL BE SHIPPED. UDI CABLES a po ao” iy se crag naeh ti aerzat sound orextemal MIDI) GRAPHICS SUPPORT DISK 
ee ray ee ees eume Print music in pilettlate a ni together a Add collins te ace (0 ours od cteen 
rc . with lyrics using FER module . Contains tull <orite-editor 
FUN GRAPHICS MACHINE DEMO: THIS iS A DEMO VERSION OF FOM DIG as eee SAMPLER B Enter music a note at a time in written music pore earner screens to full size 
THAT YOU CAN GIVE TO FRIENDS OR PUT IN CLUB LIBRARIES -- $2.00 - Only - $89.99 piano KEYBOARD emulator or viaan. Only - $19.99 
THE BELOW DISKS SUPPORT THE FULL-BLOWN VERSION OF FGM % eae nia Bi Genie alton Uniiraiedl scutes wait SUPERCRUNCHER - ony 599 
FGM FONT DISK: OVER 90 FONTS IN FOM FORMAT --------- $5,00 COMPREHENSIVE. USER FRIENDLY ART gy CXtDIE SYNTHESIZER module Turn your Action Replay into a super powerful 
- AND DESIGN SOFTWARE @ Linker joins files to form large compositions program compactor. Reduce programs by up to 
. <a om CLIPART: HIGH QUALITY GRAPHICS FOR USE i eee $8 00 i Only i $29. 99 Only : $29. 99 eo already crunched 
™EGM CLIPART VOL-1: FOUR SIDES WITH 200+ GRAPHI - $8, Sea va eae 
FOM CLIPART VOL - 2: TWO SIDES WITH 100+ GRAPHICS-- - -$5,00 Ried bernie 6 B orders aad 34 00 to above charges. SPECIFIY. COMPUTER MODEL Wife OROeR 800- 782- zt _ 
: HI- H | | 7 cl 10 a 20°% restocking fee. We reserve the mght to substitute products of diflerent appearance 
TE TE ERE MCEYLG, AND RIONTHEY CRLENDARS --—- 0b LAS VEGAS NV89121 NNR aaa tacae wie ssmettetereecies mre TOR TOO 


FGM OVERLAY TEMPLATE: MAKE YOUR OWN KEYBOARD OVERLAYS. 
SPECIFY KEYBOARD (G64, C128, SX-64) OR CO4 WILL BE SENT, 


NOTE THAT OVERLAYS ARE NOT A BEGINNERS PROJECT! ----- $5,060 
FGM UPDATE DISK V6.4: THIS DISK UPDATES EARLIER V6.0-6.3 
FGMS TO V6.4. INCLUDES SOME DEMOS AND UTILITIES ----- $2.00 
JHHBBHHEHERHHHHERHHHHHHHEHEHHEHEHHHEHHHEEHHHHHHHHBHEHAEHHHE 
SHIPPING AND HANDLING (PER TOTAL ORDER}---------- $3.50 - eaiGIN AE Me OOnE 
FOREIGN ORDERS: FOR AIRMAIL ADD ADDITIONAL AS FOLLOWS: C 1750 (512K) RAM EXPANSION PLUG-IN C= 
CANADA/MEXICO $1.00, AUSTRALIA $10.00, ALL OTHERS $5.00 33905 > 44.45 \ 
U.S, FUNDS ONLY SORRY, NO CHARGE CARDS Commodore has just released 400 of these hard-to-find RAM expansion units that give you a ful 512K wt 
JEEHEBEEEBEHHHRHREHEREHEHEEEERHHERHHRHEHEEEEEEHHHEHHHAHE of RAM at a sensational price. NOTE: The 1750 works with C64 and C128. A separate heavy-duty 


power supply is needed for the C64, which we will sell at a discounted price of $27.95. DON'T MISS 


The FGM Connection, P0.Box 2206,Roseburg, OR 97470 ee een 


2 Order Line: 1-800-292-7445 or 914-357-2424 wRA'| pepe 
FOR MORE INFORMATION CALL 503-673-2234 = "CRS eae ee 


We Ship Worldwide Fax: 914-357-6243 Hours: 9-5 ET M-F 
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KeyDOS ROM V2 
from ®)Antigrav Toolkit 


KeyDOS ROM is a chip that contains 20 new function key definitions and 20 great utilities. 
KeyDOS ROM is easy to install in the empty ROM socket in any C128 or C128D. KeyDOS 

ROM can also be installed in the space for an empty socket in Commodore 1700. 1764, and 1750 
RAM Expansion Units. All the KeyDOS function keys and utilities are available INSTANTLY 

as soon as you switch on your C128! Why waste time hunting for disks or waiting for utilities to 
load? Now you can have all of the following features built in - instantly at your finger tips! 


¥Y Simple installation in all Commodore 128 or 128D computers and Commodore RAM Expansion Units. Internal 
installation usually can be done with only a screwdriver. REU installations require some minor soldering. 

”Y Compatible with almost all C128 hardware and software including JiffyDOS, The Quick Brown Box, CS-DOS, 
and even other function ROMs. 

¥Y 20 new KeyDOS Function Keys simplify disk access on niultiple drive systems. New function keys perform 
commands on any disk drive with only one key press and without typing file names! Load or run programs, 
scratch files, open and close 1581 subdirectories, load C64 programs in C128 FAST mode, batch files - (execute 
commands from a file), type SEQuential files without disturbing memory - all with easy to use KeyDOS 
Function Keys. 

Y Swapper memory management leaves BASIC memory undisturbed! Use any KeyDOS function at any time. 
Your BASIC program will be waiting for you when you get back to it! You can even use Swapper to keep more 
than one program in memory at the same time. 

¥Y New KeyDOS Utility lets you select multiple files from a directory list for typing, printing, copying, 
renaming, and scratching. Works with most popular printers. View ASCII files with a complete 80 column true 
ASCII character set. View CBMASCI]I files. View Screen Code files such as those produced by SpeedScript, The 
Write Stuff, and other popular word processors. Copy files between drives. Convert text files between ASCII 
and CBMASCII or from Screen Code to CBMASCH. Full 1581 subdirectory support. 

Y KeyDOS 1581 Visual Partitioner lets you create 1581 partitions and subdirectories without complex 

commands or calculations! The display shows where space is available for subdirectories and will create them 

for you automatically! 

RAMDOS for Commodore RAM Expansion Units up to 2 MB. 

Throw away your old boots! GEOS SuperRBoot is the most reliable method of rebooting GEOS from an REU 

that has ever been devised! Save yourself frustration and hours of lost work when GEOS crashes or hangs up! 

SuperRBoot will reboot GEOS even if your disk drives have been renumber or shut off, and even if all of the 128’s 

memory is lost! ACTIVATOR simplifies switching between GEOS and C128 native mode by restoring the reset 

switch and STOP/RESTORE kev combination to their normal functions. 

¥Y View, edit, or disassemble disk sectors. Dump monitor output to printer or disk file. Hexpert advanced 

machine language debugger. BASIC Find/Replace utility. Recover BASIC programs after a NEW command. 

Renumber and reset disk drives. New COLLECT command protects autoboot sectors. 

Switch between two independent 80 column screens. Screen text editor and screen dump. 

Screen clock with calendar and 24 hour alarm. (If vou have a SmartWatch clock chip connected to joystick port © 

#2 for use with GEOS, a special version of the KeyDOS ROM is available that sets the time and date 

automatically. Specify the part number of your SmartWatch when ordering). 

Video Manager sets VDC video options - colors, interlace, screen height, TABs, cursor shape, and more! 

Utility disk with sample batch files, demonstration programs, and support utilities. 

Satisfaction Money Back Guarantee and free lifetime replacement. 


XS 


CANN 


CAN 


"The program ts a definite MUST for all 128 users. I definitely want KeyDOS to be a permanent part of my computer." 
-K.H., Perris, CA. 

"If you don’t have a 128. then this is (yet) one more reason to upgrade.” 
- Jan/Feb Kernel Chronicles. Edmonton, Alberta 


| KeyDOS ROM, with 52 page manual. utility disk. and shipping in U.S.. A.P.O., F.P.O., Canada 
and Mexico is $32.50 US. Shipping overseas is an additional $3. 


©)Antigrav Toolkit, P.O. Box 1074, Cambridge, MA 02142 
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e-Stop Shopping to 


Effective May 1, 1993 CMD acquired all rights to RUN software and has RUN Mag.- back issues _| Microprose games 
purchased all items from their inventory. As result, CMD will be offering one of RUN/ReRUN software Xetec Printer Interfaces 
the largest selections of Commodore 64/128 software and hardware available Abacus books & software | Electronic Arts Games 
today. CMD's decision reinforcesits commitment toC-64/128 ownersworldwide. GEOS 2.0 & applications | Skyles Electric Works 

It is our hope that we can offer "One Stoo Shapping"to Commodore owners. If Timeworks Software Dr. T's Music Software 


't have it...we can probably find it! Here is a partial list of products. Fora Superbase & Superscript} Power Supplies 
ee li : ’ : SOGWAP-Big Blue Reader ! Miscellaneous Cables 

















Blank disks - 3.5” & 5.25” 
... and MUCH More | 
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CM D Utiliti A Powerful and Unique Collection of Disk Utilities 
i : IS $ior Commodore and CMD Storage Devices 
FCOPY+A two drive file copier featuring 1541,71,81, REU and CMD DIR SORT Alphabetizing utility for 1541,71,81 drives and all CMD 


device compatibility which is capable of copying any size PRG, SEQ, storage devices makes it easy to organize large directories. 


REL, USR File. NEW features include: __ ._MCOMPARETwo drive disk compare utility makes it easy to evaluate 
Scratch/Unscratch Files » Copy/Delete C 128 Boot Sector « Disk/Partition the accurancy of a CMD partition against a disk copy. 


UnNew ° File Compare « Access DOS Commands thru Menus « Lock/ FOLLOW LINKSHelps to locate and remove corrupt files. 


Unlock Files « Format Disk/Partition « Create/Remove Sub Directories « 
Rename File/Partition/Header « Change Current Partition/Subdirectory CONVERT 41<>71 Converts between 1541 & 71 formats. Allows 


MCOPYA twodrive whole disk/partition file copier which supports CMD eich eee aley laced = eee saibaale 
storage devices and Commodore 1541, 71, 81 disk drives. Clears memory in REU or RAMLink DACC partition. 


BCOPY+A powerful backup/restore utility which backs up any CMD HD POWER TOOLSAliows editing of CMD Device Partition Table. 


device or partition to a 1541,71,81 drive or CMD FD Series floppy drive, REBUILD PDIRHelps to recover partitions after completely recreating 
This new version incorpoates the ability to dump an entire CMD device the systern on CMD Devices. 

to an HD Series hard drive. Shareware Utilities Included: 

FINDSearches specified partitions on CMD devices for files that match DEDIT64/128, SuperDEDIT64/1 28Sort or manually edit directories 
a user defined filename pattern. Includes handy printer/screen toggle. subdirectories and partitions on 1541,71,81 drives and all CMD Devices. 
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“~ ; : 
S sak oe MB RAMCard $199.95 HD Series Hard Drives are available in capacities up to 200 MB, are fully partitionable, and 
RAMI ink with 1 MB RAMCard $220.95 |] BS cope can emulate 1541 , 1571, & 1581 disks while Native partitions utilize MSDOS-style 
RAMI ink with 4 MB RAMCard $329.95 |: cae subdirectories. HD's connect easily to the serial bus or parallel via RAMLink. Includes built- 
Real-Time-Clock for RAMCard (Optional) $20.00 |=) eam a in JiffyDOS, SWAP feature and Real-Time-Clock. HD Series Drives offer superior 
RAMLink Battery Back-up (Optional) $24.95 compatibility with most commercial software including BBS, Productivity and GEOS. And 
1 MB & 4 MB SIMM Modules CALL 
Parallel Cable (RAMLink to HD) $14.65 ESS ao a eee ee 
RAMDrive 
RAMDrive 1 MB $249.95 Power Backed Expandabie RAM Disk and interface 
RAMDrive 2 MB $299.95 
-HD-Series Hard Disk Drives The fastest possible form of storage, RAMLink provides instant access to files and retains 
HD-40, (Special Edition w/ 85 MB Drive) $495.00 data while your computer is turned off. Easy to use and expandable up to 16 MB, RAMLink 
HD-100, (Special Edition w/ 170 MB Drive) $595.00 utilizes the same powerful operating system found in the HD. RAMLink also offers built- 
HD-200, (Special Edition w/ 245 MB Drive) $695.00 in JiffyDOS, SWAP feature, reset button, enable/disable switch, pass-thru port and RAM 
FD-Series 3.5", Floppy Disk Drives port for REU/GEORAM use. Ideal for those requiring maximum speed, expandability and 
FD-2000 (800K and 1.6 MB Formats) $179.95 
FD-4000 (800K, 1.6 MB and 3.2 MB Formats) $249.95 DES eee 
=] FD Real-Time-Clock Option $20.00 
=4 Box of 10, High Density Disks (1.6MB) $14.95 |:°} Qa 
: a ase nn Payette ee The FD-2000 and FD-4000 disk drives utilize today's latest3.5 inch technology. FD-2000's 
ET UnfDOS Ee Hea ee support 800K (1581 style) and 1.6 MB (High Density) formats, while the FD-4000's offer 
id ce 4 System (Computer & deve} $49.95 Support for the 3.2 MB (Enhanced Density) format as well. Fast and reliable, they support 
a System (Computer & Internal 1541) $49.95 ,<e 1941, 1571 and 1581 style partitions, Native Mode partitioning and can actually read and 
id C-128 System (Computer & drive} $59.95 ;£Gr = wnte 1581 disks. FD’s feature built-in JiffyDOS, SWAP button and optional RTC. High 
IT yap System (Computer & Internal 1871) $59.95 capacity, speed and compatibility make the FD rightfor every application, including GEOS. he 
Lag Additional Drive ROM's $24.95 GEG eget eee Ook Bar aes mene tat nema mia nee a, Reo at 
Pq Soltware Froo.. = op fg by 2 
pS geoMakeBoot (Makes bootable copies of GEOS 64/128) $12.95 S a ee ainfaining 160%. cepamatibndity wilh caripwrclal ane gee 
el eps rs ee ~ Speeds up Loading, Saving, Verlying, Formating and Reading/Writing of PRG, SEQ, USR and REL fles 
Collette Utilities (Handy GEOS Utilities) $19.95 * BuiltinDOS Wedge plus 1 7additonal features including file copier, textdump, printer toggle, and redefinable function keys 
Perfect Print LQ for GEOS (Font Coll.1&2, 49 Fonts) $49.95 ROM upgrade installs easily into most computers and disk drives. Supports C-64, 64C, SX-64, C-128, 128-D, 1541, 
Font Collection 3 (17 Fonts and 5 Borders) $19.95 15410, 1541-11571, 1581 and more. 128 system supports both 64 and 128 modes and upgraded Kernal routines. 
Border Font Collection 1 (24 Border Fonts) $19.95 Seasewes ips ee 





| JiffyMON - ML Monitor for JiffyDOS/64 $19.95 
| CMD Utilities - Collection of Powerful Disk Utilities $24.95 







~ UPS $15.00; and-day $25.00; AK, HI, Canada $35.00 
“= "TYP §9,00;2nd-day $16.00,AK HI Canada $20.00 
UPS $5.50,;2 day $10.00,;AK,HI,Canada $15.00 


me ESAS Class Mail $2.00; Canada $5.00 





te: 





(800) 638-3263 


SwiftLink, RS.232 infertace (300 to 38,400 baud) $39.95 4 —_ 
: ieee: (413) 525-0023 










SwiftLink Cable (DB9 to DB25) $9.95 bie aks 5 ve Gach: eben aneaireeus | ay 
; , Visa, Money Order or Bank Check. ipments add $5. ae ete: 
aH e ey : ee vs oe a ce COD's may require advanced deposit. Personal checks are held for 3 wks.  QAMto5PM, EST. Po rari tage 
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TWIN CITIES 128/64 CHECKSUM PROGRAMS By Michael Gilsdorf 

If you decide to type in programs from Twin Cities 128/64 magazine, you siould 
first type in and run TC128 Checksum (for the C128) or TC64 Checksum (for the 
C64). 


each time you enter a program line and press the RETURN key. 


These programs check your typing by generating a two-letter cnecksum 


The checksum is 


displayed in the upper left hand corner (home position) of the 40 or 80 column 
screen. To check for typing errors, compare the checksum on the screen with 
the one appearing in the magazine listing. 1f they’re different. then you know 


you’ve made a typing error. The magazine listing will show the correct two 


letter checksum in front of each line number. 


The checksum programs will detect most typing errors such as transposed 


characters and misspellings, but can on rare ocassion be fooled. lt uses the 


line number and value of each character as well as its position on the line to 
generate the checksum. The checksum programs will ignore spaces unless they 


appear inside quotes or within BASIC keywords. You can use BASIC keyword 


abbreviations such as ? for PRINT without affecting the result. 


Also, both TC128 Checksum and TC64 Checksum are designed to make it easier for 


you to indent text or enter blank lines. To indent text, simply type the line 


number. space or tab over to where you wish the text to begin. and then begin 


typing. This feature will improve the readability of your listings by making 


portions of your program such as FOR-NEXT ioops and DO loops stand out more 


easily. To enter a blank line, type a iine number followed by at i1east two 


spaces (or tab) and a shifted character. When the program is listed only the 


line number will appear. 


10 rem read data 


20 

30 for j=1 to 80 

40 read aS 

50 bS=bStasS 

60 if aS=".° then j=80 

70 next 3 

Additionally, TC128 Checksum has the ability to generate a checksum listing. 


(This feature is not provided with TC64 Checksum.: The listing wili show the 


checksum along side each line number as the program is listed. To begin the 
listing, type a # in direct mode (without a line number) as the first character 
on a line. Do not include any additionai BASIC commands on the iine: otherwise 
Once the listing begins. you can use the NO SCROLL key 


You’ll find the checksum 


they will be ignored. 
or STOP key to pause or stop the listing as desired. 
listing especially useful if you need to redisplay the checksums and double 


check the lines you’ve already entered. 


| km 10 rem read data 


‘ 


be 20 

ob 30 for j=1 to 80 

jn 40 read aS 

hb 50 bS=bStaS 

jh 60 if aS="_" then j3=80 


fm 70 next j 


Also, should you decide to submit a program Listing to Twin Cities 128/64 
magazine for publication, you can use TC128 Checksum program to save a checksum 
listing to disk. To create an a SEQ file listing, type: 
open 2,8,2,"0:filename,s,w": cmd 2 


# 
print# 2: close 2 


The same technique can be used to send the listing to a printer: 


open 2,4: cmd 2 
# 
print# 2: close 2 


Both TC128 Checksum and TC64 Checksum programs are listed below Ee sure to 


save a copy to disk before running them. Once run they wili automatically 


activate themselves. 


PROGRAM NAME:TC64 CK SUMV1.0 

1 print chrS(147);"tc64 checksum v1.0" 

2 print “by mike gilsdorf (c) jul 93 by parsec inc”: print 
3 for a=828 to 1001: read d: pokea,d t=ttd: next 

4 if t<>22612 then print ‘data error": end 


5 poke 770,60: poke 771,3 





6 print "tc64 checksum activated" 


7 print 


8 print "to deactivate, type:" 
9 print "poke 770,131: poke 771,164" 


10 

100 
105 
110 
115 
120 
125 
130 
135 
140 
145 
150 
153 
160 
165 
170 
175 
180 
185 
190 
195 
200 
205 


data 162, 
data 122, 
data 3, 
data 0, 
data 8, 
data 122, 
data 
data 3. 
data 0, 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


176, 
177, 

16, 
208, 
253, 
168, 
140, 

18, 


229; 
132, 
76, 
169, 
198, 
230, 
0, 
56, 
185, 
146, 
255, 
134, 
253, 
208, 
4, 
122, 
246, 


74, 
165, 
230, 

32, 


134, 
123, 
142, 
32, 
122, 
122; 
132, 
32, 
227, 
208, 
76, 
254, 
177, 
Z, 
224, 
24, 
230, 
169, 
74, 
253, 
3, 
35, 


58, 


41, 
141, 
35, 


32, 
115, 

32, 
122, 
122, 
121, 
230, 
255, 

32; 
104, 
164, 
165, 
240, 
251, 
240, 
253, 
200, 
168, 

74, 

LS; 
231, 

32, 


PROGRAM NAME:TC128 CK SUMV1.0 


Oo ON DUN F&F Ww DO KF 


~ 
So 


100 
105 
110 
115 
120 
125 
130 
135 
140 
145 
150 
155 
160 
165 
170 
175 
180 
185 
190 
195 
200 
205 
210 
215 
220 
225 
230 
235 
240 
245 
250 
255 


print 
print 


print 


data 162. 
data 61, 
data 14, 
data 45, 
data 212, 
data 61, 
data 61, 
data 10, 
data 13. 
data 19, 
data 81. 
data 77, 
165; 
data 240. 
251, 
240. 
253, 


data 


data 
data 
data 
data 200, 
data 168, 
data 74, 
data 15, 
data 205. 
data 
data 
data 0, 
data 0, 
data oF 
data 
data 9/7, 
data i152, 
data 65, 


data 184, 


2595; 
132, 
144, 
165, 
Td 
209, 
240, 
67, 
56. 
18. 
0, 
162, 
22, 
33, 
165, 
14. 
133, 
208, 
208, 
24, 
24, 
L3, 
200, 


255, 
255, 
166 
181, 
134, 
85, 
200, 
197, 


"to list, type: 


“to deactivate, 


134 
62, 
15; 
46, 
32, 
61, 

250. 

132, 
32, 
32 
24, 


101, 
170, 
251, 
166, 
253, 
219, 
7; 
105, 
105, 
141, 
32, 
208 
32, 
32, 
D2: 
75, 
61, 
160, 
32, 
65, 


#": 


print chr$(147);"tc128 checksum 
print "by mike gilsdorf (c) oct 


print 


type:” 


60. 
32, 
201, 
76, 
160, 
208, 
230, 
13; 
240, 
78, 
32, 
134, 
23. 
224, 
74, 
254, 
202, 
152, 
165, 
65, 
65, 
76, 
236, 
245, 
89, 
129, 
165, 
166, 
133, 


236, 
208, 


32, 
128, 
35, 
223, 
80, 
8, 
61, 
160, 
255, 
75, 
240, 
251, 
133, 
34, 
176, 
wae 
16, 
208, 
253, 
168, 
140, 
13, 
66, 
200, 
13, 
146, 
23, 
65, 
98, 
32, 
66, 
180, 





96, 

0, 
107 
209, 
240, 
165, 
123, 
152, 
210, 
168, 
162, 
20, 
33, 
165, 
14, 
133, 
208, 
208, 
24, 
24 | 


146 


165, 
£70. 
169, 
L224 
250 

132. 


101, 
170, 
251, 
166, 
253, 
219, 

17, 
105. 
105, 
96 , 


v1l.o" 


91 by parsec inc’: 


"poke 770,198: poke 771,77" 


147 
3, 
208, 
13. 
169, 
198. 
230. 


246, 


74, 
165, 

1S. 
141, 
153, 
169, 
169, 

78 

32 
165, 
133. 
236, 
133, 

76. 


79, 
170. 


129, 
146 
76. 
254, 
17? 


224, 

24, 
230, 
169. 


253 
13 
206, 


TC-128/64 


134 
144 
160 
208 
230 


L160 
2U0 


134 
21 
224 
74 
254 
202 
152 
165 
65 
65 
19 


print 


bank 15: for a=3328 to 3583: read ad: poke a,d: t=ttd: next 
if t<>29208 then print ‘data error”: end 
poke 770,0: poke 771,13 


print "tcl28 checksum activated" 


134 
240 
166 
76 
198 
209 
32 
89 
146— 
27 
234 
24 


230 
32 
101 
254 
45 


74 


140 
SS 


141 
141 
32 
81 
134 
32 
133 
208 
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